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LES JOURNERAUX 


Dans PPC-IN n°12: 

Changement sur l'imprimante standard 
Assembleur Microcode 4P-41C sur 4P 35 

Bugs des “Yand 

Equations linéaires à coefficients complexes 
Escape pour HP-82162A 


Dans le PC1500(description interne compléte!) 


Dans PPC-UK VINL Juillet 32: 
Calcul de taxes 

Le pendu avec X fonctions 
les Fonctions calendrier 
Hexadécimal 3yte Loader 
impression automatique de bandeaux 
diverses applications et rubriques 


APFLICATIONS 


Jente et_ achat _de matériel: Ce journal n'est pas un bon 
support de petites annonces car sa parution est trop 
rare. Tout ce que je peux vous proposer est un service 
par téléphone. En fait il faudrait que l'un de vous se 
dévoue pour cela, car moi je n'ai guére le temps.Le 
principe est de recevoir par lettre ou téléphone les 
offres de matériel et de répondre au téléphone en don- 
nant les adresses. En attendant n'achetez rien sans me 
passer un coup de fil, j'ai quand même souvent des of- 
fres. J'ai actuellement une HP L1C, une imprimante, 

un ordinateur Victor 16K (vendu par T3). Nombreux sont 
ceux qui recherchent un lecteur de cartes. 


(2PC ROM) 


J'ai de nombreuses demandes de détails concernant le 

PPC ROM. Les Toulousains peuvent le voir en action. 

Les gens du nord (cela ressemble à une chanson) peu- 
vent téléphoner à Janick Taillandier, j'éspére qu'il 
aura enfin reçu son ROM. Pour les autres, voiçi quel- 
ques idées: 

routines alpha:6,pour l'essentiel celles du livre de 
Wickes (améliorées) 

13 routines d'opérations sur des blocs de mémoires 
(effacement, échange, incrément,extrémes,statistiques, 
effacement et insertion,multiplication et addition) 

6 routines de travail sur le rideau (curtain). 

k routines concernant l'affichage (test,mode..) 

9 routines sur les assignements, dont un programme 

pour faire les assignements (KA) et d'autres pour 
suspendre, visualiser ou packer les assignemehts 

6 routines pour charger des octets en mémoire program- 
me comme le LB de Lionel Ancelet dans ce numéro. 

31 programmes mathématiques, dontchangement de base 
(jusqu'a 24 jJarithmétique complexe,calendrier,combinai- 
sons,régression,calculs financiers (trés perfectionné) 
dérivée et intégrale,nombres aléatoires,matrices,nom- 
bres premiers,tirage de nombres sans duplication,racines 
etc. 

17 programmes de travail sur la mémoire 
9 programmes pour l'imprimante et le #Wand: 
haute résolution sur le même ruban (etc) 
et bien d'autres Je ne connais pas d'utilisateur 
de HP qui n'ai pas l'usage de ce ROM.... 


(synthétiques) 
T courbes 


s…. 


petite nouvelle:remarqué dans le dernier PPCJ: Depuis 
1982 les HP-41l ont un nouveau micro processeur qui per- 
met d'effectuer un RESET lors d'un crash en pressant + 
et en même temps ON machine allumée (c'est à ce détail 
prés la nême procédure que Mémory Lost). 


L'assenb 
définir 


Cotisation: 
Abonnement 
2otisation 











L'abonnement ne donne droit qu'au journal. La cotisa- 
ion donne en pius le droit de recevoir une lettre d'in. 
formation entre deux journaux, et de bénéficier des 
services du club: livres à prix réduits, autocollants, 
réductions chez Les comnerçants,... matérialisés par 
un numéro. 

PPC USA fourni aux adhérents un numéro (actuellement 

: chiffres, sans ioute ientot 5, le nien de Juin 31 
est 7226). Toulouse va faire de nême, en ‘faisant pré- 
céder le numéro par La lettre 7 {pour Toulouse), donc 
in numéro ? par exemple le = ; 
Jean-Daniel n'est pas ancore le numé- 
ro de sécur ça 7iendra !! 








Des adresses toujours utiles 

PPC-T Jean-Daniel Dodin 77 rue du Cagire 31100 Toulouse 

PPC-USA Richard James Nelson 2545W Camden Place Santa 
Anna California 92704 : L 

PPC-TN (journal de périodicité variable, trés techni- 
que) J.E. McGechie 7.0. 30x 512 Ringwood,Vi- 
ctoria 3134 Australie abonnement $20 austra- 
liens. 

PPC-UK Angleterre :David M. 3urch, 
Lane, Windlesham, Surrey,GU20, 
{journal en création) 


H © PF 


Rectory 


Astage, 
16, 


6B%, 


-T YINk, Tableau de données, y 2 mélange 


c il un 
mal et d'hexadécimal dans les codes: 
e 26 est Hex F7 00 90 9k 20 90 90 10 
e 05 est correctement donnée, en nexadécimal. 


Tips and Routines, p 96, ligne 67, 
de 62. 


Calculator 
52 au lieu 


Dans 
lire 


Dans le "Manuel d'utilisation et guide de programmation 
de la HP h1C" , Limites aux sous programmes, page 10 
il est indiqué que en cas d'appel d'un septiéme sous 
programme le calculateur arréte l'exécution et affiche 
"NO ROOM". C'est faux. vous pouvez appeler autant de 
sous programmes que vous voulez, nais seules les 6 der- 
nières adresses sont conservées, aprés le 6° retour 
le calculateur stope au premier RTN ou END rencontré. 
Le message "NO ROOM" apparait lorsque l'on essaie d'in- 
troduire un programme trop long pour la mémoire dispo- 
ible (à partir du lecteur de cartes). 


Le chargeur de batteries décrit dans le numéro VINU 
de PPC=T donne des parasites dans un ampli si il est 
rapproché des hauts parleurs. Une vingtaine de centi- 
nétres d'éloignement suffisent. 


Dans PPC-J 
17 RC doit 
28 RC doit 


VBN6 p25, ROM Manual correction, 
étre LC 
étre LC 


EPROM Box: Il est dit dans plusieurs documents que lors 
de l'utilisation d'une seule ZPROM L8, celle-ci doit 
étre plaçée dans le connecteur central. C'est inexact. 
Il faut dire que le connecteur central correspond aux 


adresses basses (paires: 6,8,A,C,£) et que le connec- 
teur gauche correspond aux adresses hautes (impaires 
5,7,9,3B,D,F). Ainsi avec une EPROM LK il est commode 
d'utiliser l'adresse 5 (ou F si on a Timer et/ou HP-IL) 
il faut alors placer la 2716 à droite (conne ) 


toujours) 
et la 2732 tout a fait à gauche, avec un selecteur 
0101 (ou 1111). 


System Dictionnary, 
p72. 

"No Frill" (sans probléme) 
les plus beau plantages qui 
soient. Le listing est correct, ce qui ne va pas vient 
des instructions "invisibles", mal décrites. 

La ligne 05 "" est décimal 241,210. 

la ligne 1l est 245,1, 105,12,0,32, 

Il est possible mais facultatif de remplacer les li 
ges 50 et 33 par . et la ligne 65 par ©1. 

Il n'est pas possible, sous peine de mémory lost de 
SST les lignes de 12 à 15 
La ligne 12 ASTO © est 154,125 


Des erreurs graves dans HP 
empile pour le programme KA 
Ce programme annoncé comme 
donne tel qu'il est décrit 


par ex- 















Mais si vous voulez un programme réellement "NC FRILL" 

remplacez les lignes 11 à 14 par: 

12 Hex 75 91 69 900 FO Fr 

12 ASTO c 

23, 277 

1: X2>Y 

15 STO ND Y 

16 R4 

ER «A7 

(STO ce } 

27 là vous pouvez SST 5ù vous voulez. 

explication: il doit y avoir au soins un registre di 

ponible sous 1 ideau que nous zanipulons dans 2c.Le 

programme ri e place le rideau en 2C0, le dernier 

registre t ide. ce 2as un arret fait ML, 

mais ils t de faire 3 0. Mon programme place 

Le rideau CF, premier registre d'état (le). Le re 

sistre 1 ganenent est rs i' où la récessité 

de L'aûre e : È olcnté. {l'oubliez 

2 e pen i mme Dour recons— 
de 24 eu 





PPE=T NM 
SEPTEMBRE JCTOBRE 
1982 P2 


RERCTIUNHE 


7 July 1982 


M.Jean-Daniel Dodin 
TT rue du Cagire 


31100 Toulouse 

FRANCE : É 
Traduction par M-D Dodin 

Cher M. Doûin 

Merci pour votre lettre et l'exemplaire du journal PPC 

Toulouse. C'est une jolie revue, et je suis sûr que 

vos compatriotes sont très heureux de la Lire en fran- 


çgais. Malheureusement, je ne lis pas le français très 
bien, mais je suis capable d'en traduire une partie. 


Oui, je mettrai dans le prochain numéro d'Août, une 
notice concernant votre Chapitre de Toulouse. Peut- 
être que de cette façon, vous pouvez obtenir davan- 
tage de membres pour votre branche française de PPC. 


Quant à vos commentaires, concernant les deux Bibli- 
othèques séparées, Mr Dodin, je peux seulement vous 
dire que je ne peux y faire grand chose. La Biblio- 
thèque à Genève, à cause des barrières commerciales 
et des lois internationales, est une entité séparée 

et non directement sous le contrôle de Corvallis. 
Aussi, à cause du nombre des langues Européennes, 

des coutumes et des monnaies, c'est une bataille 
constante pour la Bibliothèque de fèneve de faire 
accepter des programmes dans la Bliothèque. 

Un bon nombre de programmes soumfs ne respectent 

pas les standards de la Bibliothèque, et cela cause 

de nombreux retard, et fait perdre un temps précieux. 

Nous essayons de faire de notre mieux, ici à Corvallis, 

pour exercer plus de contrôle sur 1: >liothèque de 

Genève,et je pense que nous ferons bientôt des 

progrès. Aussi ne perdez pas espoir à ce sujet. 


Un des problèmes en Europe est de trouv&r des techniciens 
qui soient non seulement qualifiès pour vérifier les 
programmes qui entrent, mais qui soient également 
capables de lire et de comprendre plusieurs langues. 
C'est un problème très difficile qui ne peut être 

résolu à court terme. 5 

Nous avons longtemps désiré d'unir les Bibliothèques, 
zais la loi internationale et les problèmes sont très 
difficiles à surmonter. Nous poursuivons nos efforts 

pour trouver des moyens d'accomplir ce but, mais c'est 

un travail long et fastidieux. 

Merci encore de m'avoir tenu au courant de la crèation 
du Chapître français PPC. 


Meilleurs sentiments, 
Henry Horn, Editeur 
HP KEY NOTES 


Cher Mr Dodin 

Je demanderai à la MAB d'afficher le pe 
de me situer, je vous signale que j'ai 
qu'a la retraite je m'occupe de gestion et notamment 
en Afrique où j'ai passé une bonne partie de ma vie. 


A ?erpignan j'ai une participation dans un magasin pour 











lequel je tiens la comptabilité, il en est de même 
dans une SCI. Bien que n'ayant pas de fornation sci- 
entifique j'ai £té nordu par l'informatique. Mon ÆP 2 
pris la piace d'in véritable compagnon et je suis tou- 
jours stupéfait de ce que j'en tire car je l'ai mise 
À toutes les sauces de mes occupations. Centralisati- 
on comptables , fiscalité, amortissements, :outr en res- 
tant trés élémentaire. 3i je juge aprés Lecture de vos 
journeaux jue mes programmes n'apparaissenz pas ridicu- 
les je vous en ferai part. 
Totre journal Vh parle de l'imprimante 0 colonnes äis- 
ponibie? et en Septembre ‘me 2PROM . Cela u'intéresse 
vivement. Puisje avoir des précisions. Le manuel 2st- 
Îil en français? J'avoue ne pas comprendre _'ang ° 
se suis né à 3anyuis/ner . J'ignore si 7 enfance 
passée à zanet remonte loin mais il re r 2sas grand 
chose de ce qui t le charme de not Le cote. 
ous | 
Houdayer(Tèé 





L'imprimante est disponible à la SICAPE (ef ViNh elle 
est aménagée en France et donc le manuel est en 
De nonenfance à Canet il ne reste que des immeubles de 
k étages À la place de non ancienne maison et un hou- 
levard là où il y avait la plage ... 


Cher Monsieur, 

J'ai bien reçu votre courrier et je vous en remercie. 
J'avoue qu'aprés avoir parcouru PPC Journal YiNk je ne 
sens un peu perdu. Je me pose des tas de questions di- 
verses et variées: 

- ai-je besoin de connaitre la programmation synthé- 
tique? 

- qu'est-ce 
- qu'est- e 
eTCe.s.e 


qu'une =PROM 30X?7 
que bruler des EPROM? 
J'ai acheté ma h1CY sur un coup de téte (un ami médecin 
m'en avait dit le plus grand bien) Ensuite je ne suis 
demandé ce que je pourrais bien en faire et j'ai subi 
un stage d'initiation chez Intralude à Bourg la Reine 
(trés intéressant pour les débutants- et en Novembre 
ils organisent un stage de perfectionnement auquel je 
me suis inscrit- à cette occasion je leur parlerai de 
PPC Toulouse) En accessoire à ma 4 je posséde l'HP-IL 
et le XTdrive, dés que le convertisseur d'interface 
paralléle sortira je disposerai gratis d'une impri- 
mante 80 colonne. L'interface vidéo m'intéresse mais 
vu son prix (2900F dites vous) si le noniteur n'est 
pas compris je pense que j'achéterai plustot un Ti99A. 
Sur ma k1CV j'essaie des programmes qui tournent au- 
tour de mon activité professionnelle(je suis control- 
leur de gestion) et j'aimerai arriver à stocker et cal- 
culer mes prix de revient (c'est la raison pour laque 1- 
le j'ai acheté le KT drive (qui est formidable ). 
Je ne sais qui profitera le plus de mon adhésion à 
PPC Toulouse, PPC ou moi, mais je pense compte tenu de 
mon trés faible savoir que ce sera moi. 
Je joins à la présente un chéque de 196 F pour les 
livres CTR et HP-Ll-HP-IL Dictionnary que je vous prie 
de m'envoyer à mon adresse (je suis bilingue francais- 
anglais) 
Au plaisir de vous lire, Heureuse programmation et 
bonnes vacances, cordialement 

Jean-Marie Hanon (T23 
PS: CTR est-il suffisant pour débuter la programmation 
synthétique ou faut-il le bouquin de Wickes "Synthétic 
programming"? 


Ce que j'ai vu du Ti-99A ne m'encourage pas à le recon- 
mander . Son succés aux USA semble avoir été mitigé,:l 
y & plus de deux ans qu'il essaye de s'imposer sans y 
arriver et si la politique du fabricant est la même 
qu'en France, ce n'est pas étonnant. L'appareil de base 
est bon marché mais inutilisable tel quel et tous les 
accessoires sont hors de prix. Comparez les tarifs à 
ceux d'un TRS 80 
Le principe d'un club comme le notre est que tous trou- 
vent plus de choses dans le club que ce qu'ils y ap- 
portent, c'est pourquoi il est important que chacun 
améne sa pierre. Nous avons la même devise que les 
mousquetaires (un pour tous...). 

Le livre de Wickes apporte une connaissance intime de 
la machine au dela de la simple programmation synthéti- 
que. Je ne sais pas encore à l'heure ou j'écris (10/8) 
si je pourrai publier la traduction, mais je publierai 
certainement quelque chose sur le sujet. 


Madane ou Monsieur, 

Pouvez-vous ne donner des renseignements précis 
les fonctions et les possibilités du PPC ROM? 
Merçi 


sur 


Michel Delmas (T2Lh) 
(voir ailleurs dans ce journal) 
Monsieur Dodin, 
; : À : : ne 2 4 
(...)Je suis principalement intéressé par La program- 
nation de gestion notamment comptable à orientation 


fiscale et je ne préoccupe du traitement de texte: si 
ce n'était le probléme du haut niveau de coût de ïZ%P 
j'aurais sans doute acquis un HP 37 connectable avec 
le 4P 41. L'information sur les nouveautés 4P à Chi- 
cago OP p 13 a bien retenu non attention. 

Cordialement 

3regeault (T51) 
Cher Monsieur, 
Je vous prie de bien vouloir trouver çi=-joint le sulle- 


tin d'adhésion duement sonplété, 
questions et une commande. 
Questions: 


ainsi que quelques 





- Quels zoyens ai-je di'étre au courant du travail ac- 
compii au niveau iu _argage zachinre? 
- Ztes vous 2n nesure de me fournir le PPC ROM ou 5ie 


français. 


PPC-T N 1 
SEPTEMBRE OCTOBRE 
1282; "P3 


faut-il obligatoirement passer par RJ Nelson? 
Qu'est-ce que le HP 82166 dont il est question dans 
le bulletin téléphonique? 

Qu'est-ce qu'une EPROM 30X exactement et quelles sont 
ses capacités? 

Commande: HPk1/HPIL System Dictionnary 80 F+6F de port 


286 F, veuillez donc trouver çi-joint un chéque de 86 F 
Salutations amicales et longue vie à 
PPC2T “lein (T34) 


Le travail sur le langage nachine est actuellement en 
France limité à Taillandier (T8),Bravo(T2) et moi-même 
(T1), nais nombreux sont ceux qui s'y intéressent. Jus- 
qu'a présent il fallait avoir une EPROM Box au minimum 
pour en faire. C'est toujours un peu vrai, mais je suis 
maintenant équipé avec tout ce qui est nécessaire (Epronm 
box, programmateur d'Eprom,...)et je peux:coordonner 

le travail,diffuser les Eprom déja disponible (SMIC, 
X-Fonctions,PPC ROM2+TOULROM(?))pour 200 F chaque, 
Eproms comprises et franco de port,essayer vos program- 
nes (gratuitement, mais dans un délai non garanti). 
J'envisage aussi la constitution d'un dossier de pho- 
tocopies concernant le jeu d'instructions du micro- 
processeur, la liste des codes internes de la XP et 

de ceux des périphériques et les commentaires (nom- 
breux) déja faits. Mais LK de ROM utilisent à peu prés 
25 pages et il doit y avoir au total pas loin de 300 
pages, ce qui améne à un coût de 150 F . Si vous étes 
intéressés, envoyez=moi une enveloppe timbrée à 1,60 
avec la mention “Microcode" (et votre adresse, bien 
sur. Dés que le dossier sera prét et le tarif exact 
connu je vous en informerai. 

Sachez également que des démarches sont en cours pour 
inporter en France les Eprom Box, et qu'il n'est donc 
pas urgent de les commander aux USA. Cependant Weavers, 
le principal fabriquant effectue les envois dans la 
journée (cf VIN). 

- Le PPC ROM est disponible uniquement aux USA . Uti- 
lisez le bon de commande que je vous ai envoyé.(autre 
ee contre une enveloppe timbrée à votre adres- 
se 

- le HP 82166 est un convertisseur série-paralléle. 

il se branche d'un coté sur la boucle HP-IL et offre 

de l'autre une sortie sur deux ports paralléles 8 bits. 
Notice (hors commerce) de 36 pages,200g contre 18 F 

et une enveloppe Ak timbrée à 2,90. 

Le prix du convertisseur est d'environ 1400 F, mais 

il est vendu par 10 pièces...voir avec la SICAPE 

(VIN pa) 

-pour l'Eprom Box, 





voir article ailleurs dans ce n°. 


Cher Monsieur Dodin, 

Bien reçu votre lettre et le ViNk du Journal. Merci. 
Aprés avoir lu ie tout, je voulais signaler une autre 
façon de supprimer un "Private", sans avoir besoin du 
Byte Jumper: 

avec un programme privé en mémoire il faut: 


Passer en mode PRGM 

CATALOG 1 

R/S après l'apparition de Y .END. REG nnn 

passer en mode ALPHA 

appuyer sur la touche de correction ( affichage = 4094 END ) 
sortir du mode ALFHA 

appuyer sur la touche de correction une deuxième fois pour effacer 
le END au pas 4094 

faire un XEQ "END" , sortir du mode PRCM , et un dernier GTO.. 


cette manoeuvre a ‘pour but de remplacer le .END. qui 
contenait le Private par un END Normal. 

Je vous serais également trés reconnaissant de bien 
vouloir ue faire parvenir in complément d'information 
sur la ROM PPC, en particulier le genre de programmes 
d'application qu'il contient, à défaut d'une démonstra- 
ion. 2n vous remerciant d'avance pour ces documents, 
cordialement J=P allés (Th) 


‘Tous qui tapez à La machine, soyez gentil, pour que je 
puisse passer vos lettres dans Le journal sans les re 
<aper, pas plus de 13,5 cm de largeur! Une methode conm- 
node d'y arriver est de tracer sur une feuille deux 
=raits au feutre noir à la bonne distance, et de placer 
cette feuille derriére sur laquelle 
cette façon de supprimer un ?rivate a été 


ceii 





"L'Ordinateur Zndividuel", en son temps, c' = 
leurs ‘me des raisons pour lesquelles, con 
aux habitudes de ?PC, j'ai accepté ie pub! 
5i beaucoup les connaissent, alors cils doive e 


connus de tous. | | 
En fait le procédé çi-dessus ne narche pas toujours 
(j'ignore quand et pourquoi) . Ù | | 
Le GTO.. fait disparaitre toutes les compilations in- 
ternes, ce qui peut ètre trés génant. 


Cher Jean-Daniel, 
Je vous remercie pour l'extrait de journal TN 8 qui 
m'a permis de clarifier des idées sur le catalogue 
3 non normalisé de la }1C. J'ai trouvé votre journal 
trés intéressant. /os programmes personnels sont ceux 
que j'ai le plus appréciés et pourtant je suis sévè- 
re; je reconnais là le talent d'un von programmateur 
‘plein d'astuces). C'est aussi une rés bonne idée de 
consacrer une ou deux pages sur les nouveautés et 
les zrix. Le topo sur l'assembleur n'a plu, vous de- 
vez continuer à envoyer des articles instructifs: un 
petit article littéraire permet de reposer l'esprit 
aprés toutes ces pages techniques! 
J'ai lu aussi avec beaucoup d'interetvotre correspon- 
dance avec Jonn McGechie. Je suis trés agréablement 
surpris par ce qu'ont trouvé les australliens. Ce 
langage nachine m'intéresse énormément car je faisais 
aussi des recherches sur ce coté là (sans succés). 
J'ai vu que vous aviez reçu tous les TN-PPC. 
Pourriez-vous m'envoyer une photocopie des plus inté- 
ressants et/ou un résumé sur ce qu'ils ont trouvé 
(les codes et adresses de ce langage machine). Je 
vous envoie un chéque de 120 F pour avoir "Tips and 
Routines", les 10 F supplémentaires étant pour payer 
les photocopies de TN( je vous enverrai plus d'argent 
si cela est nécessaire; d'autrepart si la photocopi- 
euse est gratuite gardez l'argent pour le club en vue 
d'une bibliothéque ). 
Vous demandiez ce que veut dire JB+SP. Je 
tromper, mais il se peut que cela veuille 
Byte+ Synthétic programming, c'est à dire 
tion du Byte Jumper. 
Avez-vous acheté l'EPROM Box? 
pour les membres du club? 1200F? Le prix des EPROM 
modules est-il de 200 F? La capacité maximale est 16K 
pour celles de Jim Dearras et 32 X pour une autre mar- 
que. Avez-vous fait la compa aison? Le club PPC-T -a- 
t-il acheter le programmateur d'EPROM? (...) 

Raphaël Horak PPC-T37 

k jardin du Casino 


peux me 
ire Jump 
l'utilisa- 


Quel est le prix exact? 


Je n'envoie en principe pas de photocopie des pu- 
blications PPC disponibles . Il y a 12 n° de TN de 
chacun 60 pages AS, tous disponibles . Les portions 
concernant le microcode font partie de Microcode L 
(50 pages,25F +enveloppe à 8,50). La photocopie n'est 
pas gratuite, il faut même que je me déplace. Je les 
facture donc .50 F La reproduction locale est encou- 
ragée (entre membres). 

'EPROM Box YWeavers m'a couté $205 + L16 F de TVA et 
douane à l'arrivée. La 32K est du même fabricant 
(k95$).Voir VINL pour Protosystéme.importation en- 
visagée. J'ai acheté un programmateur d'EPROM et je 
diffuserai effectivement les ZPROM de PPC à 200 F 
le jeu. 

Monsieur, 

Je vous remercie de l'envoi de vos PPC Journal depuis 
vos premiers numéros. Ces journeaux sont intéressants, 
mais un peu ardus, du fait que je n'ai aucune connais- 
seance en informatique. 

Cette année j'ai suivi un cours de formation chez 
Intralude, cours qui m'a rendu service pour es pro- 
grammes de calcul de prix de revient pour la poterie: 
Je connais les prix départ en fonction de la remise 
correspondante aux nombres de piéces achetées, re- 
mise différente suivant les catégories, je peux chir- 
frer chez le client sa commande. 

Je vends aussi des tunnels en plastique, 





nais ce sont 









des calculs trés simples. 
J'ai aussi un programme de chauffage de *unneïis ou 
de serres avec les différents combustibles du narché. 
Mais je recherche des jeux pour es pe enfants: 
j'ai recopié le vendu, le réflexe, la Le car- 
ré nagique, le xibur. 
Jn seul reproche à votre journal, son $criture zrop 
petite, j'accepterai de payer un peu plus cher pour 
le papier mais le supplément ie port pour in pli non 
urgent est de 0,960. 
Teuillez croire, Monsieur, en nes sentiments distin- 
gués. 
Pierre 
Un article sur Zntralude n'intéres 
le des caractéres iouble ous Les 
inp u ds) SE Je 
pit u! ‘n pet 
pas grave! 
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PROGRAMMES 


Voiçi encore un programme tiré de L'Ordinateur de po- 
che (version Texas) et traduit pour notre #P! 

(cf 1'OP n°5, p56). 

Ce programme se donne pour but de vous fournir toutes 
les décimales de n! jusqu'a...je ne sais pas, je n'ai 
pas eu la patience d'essayer. 

n'! qui se lit Factorielle n est le résultat de la nul- 
tiplication de tous les nombres entiers précédent n 
etn : 1x2 x 3 x ...x n. Votre HP le calcule avec 
la fonction FACT, nais trés vite n! dépasse la capaci- 
té entière de l'affichage et 69! est la plus grande 
factorielle que vous puissiez calculer sans dépasser 
la capacité de calcul. C'est bien peu! Le programme 
gi=-joint fait beaucoup mieux, mais en vpeaucoup plus 

de tenps. 

Depuis j'ai trouvé à l'UPLE un programme (30008) en 
italien qui fait la même chose jusqu'a 999! 

Je n'ai pas analysé ce programme en détail, suffisem- 
nent pour voir d'assez nette différences par rapport 

au mien, qui justifient la publication. 

Le principal probléme est d'éviter que les arrondis 
effectués dans certains calculs ne donnent des déci- 
males inexactes, c'est pour cela que je n'ai rangé 
dans chaque registre que 7 chiffres. J'ai cru com- 
prendre que le programme italien utilise dans les 
registres deux éléments de 5 chiffres séparés par une 
virgule, les calculs ne se faisant que sur chaque élé- 
ment séparément...a voir. 

Le Programme italien (au fait, auteur Massimo Massa) 
donne également une formule pour calculer le nombre 

de décimales de n!. Dérivée de la formule de Stirling, 
elle est sans doute approximative. 

analyse ligne à ligne du programme FACTO 


L Ini, mise à © 

7 ini registres 

5 raméne n: nombre dont on cherche la facto 
rielle 

20 mise à jour de l'index 

23 les nultiplicateurs multiples de 10 sont sim- 
plifiés au profis de R5 

31 à cette ligne, en x la valeur à utiliser du 


aultiplicateur J' 


35-38 multiplie par J' tous les registres désignés 
par le compteur 00 index 

39 initialisation de la boucle suivante, mise 
du compteur au premier registre utile 

Li Retenue: laisse dans le registre les T chif- 


£fres de droite, ajoute les 3chiffres'’au des- 
sus au registre suivant 
5,3 et ainsi de suite pour tous les registres 


51-56 est-on arrivé au registre le plus haut? 

58-62 Y a-t-il une retenue à placer? 

63-64 le premier registre de résultat est-il nul? 

66 mettre à o le registre nouvellement créé 

78 mettre le nombre de O à jour 

81 incrémenter le multiplicateur courant J 
{début à 1, fin à n) 

84-87 tant que J inférieur à n, reprendre la boucle 


88 sortie du résultat 

89-103 alignement des zeros, sortie sur l'imprimante 

10-122 controle du flag 55 pour accélérer le calcul 
sans avoir à débrancher l'imprimante. Si 
vous avez le PPC ROM:55,XEQ"IF" et le tour 
est joué. 


Les seules lignes synthétiques sont les E qui peuvent 
étre standardisés et les "" (FO) qui peuvent ètre 
remplaçés par un label . 


81#LBL “FACTO" 21 18 4 65 CLX 
32eLBL À 22 / 43 STO 86 66 XC> INB 4 
93 XEG 55 23 FRC 44 FRC 
44 FIX à 24 x=8? 45 ST IND 89 G7LBL 44 
35 CF 29 25 SF 45 46 ISG 88 68 DSE 40 
6 CLRG 26 1 47° 69 XC) IHD 48 
a7 ! 27 F5? 45 48 RCL %6 79 ISC 88 
88 STO 48 è8 ST+ 45 49 INT 11° 
#9 STO 47 29 ;1 S8 ST+ IND 88 72 DSE 38 
18 3,887 38 RCL 97 SL RL 82 73 GTO #4 
11 STO 82 31 FS2C 85 52 RCL 98 747 
12 E7 32 + 53 K(=Y? 75 ST+ 45 
13 STO 43 54 GTO 82 76 1 
14 Rt 33eLBL A1 55 RL 46 77 ST- 82 

34 STe IHD 48 56 IKT 
ISeLBL 8 35 DSE 88 7 X#97 78LBL 83 
16 ST0 44 36 GTO 81 58 SG #2 791 
37 ISG 38 SJ 5 38 ST+ 97 
17+LBL 45 68 RCL 88 31 RCL #4 
18 RCL 32 38eLBL #2 61 X297 32 RCL 97 
19 STO 88 39 RCL [HD 44 62 GTO 83 93 x<=Y? 
28 RCL 87 48 RCL 33 63 RCL #2 34 GTO 45 
41 STO IHD 88 64 STO 48 


SIZE 266 


308 RU 85eLBL E eu 5 2HALBL 2 
A98306057512216448636835 86 RCL 02 186 STO \ 252 ENTERT 
379461297268629388588884 87 STO 88 187 CLX 298 ENTER* 
173576999416776741255476 88 KEQ SS 188 RCL d 254 LOG 
533176716867465515291422 189 STO € 25 1 
477573349939147888781726  S94LBL 96 118 “-AAAAQ- 29% EtX 
369864263997759083154226 90 RCL IND 98 H1XO LC 257 LOG 
342927986974559841225474 91 *8080989" 112 ST0 d 2$ - 
938271954684808812215776 92 ARCL X 113 FC 15 25 Rt 
252176854255965356903506 93 *+ABCDEFC* 114 SF 15 2ge « 
788725264321896264299365 © %4 REL \ 115 XO d 281 Rt 
284576448838388999753943 93 CLA 116 STO C 262 PI 
489625436853225988776521 96 STO C 117 -HM° 363 * 
278822437639449128129679 97 ACA as 264 2 
675268389712293691943649 98 DSE 88 TS eTD à 235 « 
996468498166458227716588 99 GTO 6 128 XO 1 266 LOG 
185176546469348112226834 188 PRBUF DL 247 2 
729724866373258587506878 181 RCL 65 122 END 258 / 
158169794168858753752137 182 VIEN X 249 + 
554918289126407157154939 183 AB 278 INT 
282294937952636580145235 at! 
233156936482233436799254 22 + 
594895276828688862232812 273 END. 
3873830888 17849609 


72 Nombre de zeros 
TRAITEMENTS DE CHAINES ALPHA 


L'EM permet entre autres de triturer les chaines 
alpha très facilement.Ci-dessous quelques routines 
(à améliorer 1) qui le démontrent: 

"AA" permet d'inverser les lettres d'une chaine.J'ai 
vainement essayé de resoudre ce probleme sans utili- 
ser de registres;cela parait possible pour les chai- 
nes de peu de lettres mais les autres sont un vrai 
casse-tête.Temps execution 20 lettres;10,17 sec. 

BB" Inverse les lettres extrèmes de la chaine.Peu 
compliqué,mais peut-il servir à quelque chose? 
"CC"Echange les lettres de rangs X et Y sachant que 
Y X.Introduire Y,ENTER,X et XEQ CC.La pile seule est 
utilisée mais le contenu de X et Y est perdu.Temps 
moyen;1,65sec 

"DD°Retire un charactère suivant son code ou sa posi 
tion dans la chaine.Entrer code ou position puis XEQ 
DD.En fin de routine le code est en Y et la position 
(précédée du signe -) en X.Temps:0,87sec pour recher 
che suivant code et O0,72sec suivant position.La dif- 
férence provient de la fonction POSA;:0,15sec 

NOTA ;Les routines BB,CC et DD restituent la chaine 
dans l'ordre initial hormis les lettres concernées. 





SIZE O2k Frédéric Darin (T6) 

_ 16 CHS à7 + #4 -i 
au : 17 AROT 88 STO 48 85 AROT 
83 “TE > 18 RON 89+L8L 84 86 XOY 
De 19 XTOR 18 ATOX 97 XTON 
Re c@ rt 11 STO IND 38 n8 PROMPT 
De 21 CHS 12 1SG 98 89 END 

22 AROT 13 GTO 48 
Ÿ 23 KO 2 14 RCL 98 81eLBL “DD 
BIéLBL CC 24 XTOR 151 82 XEQ *T* 
82 XEQ -T 
2 XOT 16 - 37 65 

A3 XOY 4 : ‘ 

x &i {7 INT 84 XOY 
84 STO Z 97 +4 
sp 7 18 STO 49 85 2? 
de UT è8 CHS 194L8L 42 %6 FOSA 
pe 29 AROT 24 RCL IKD 4 27 AROT 
Re 38 PROMPT è1 xT0R 38 ATOX 
pi 31 EXD 22 DSE 88 29 XOY 
fa 27 60 22 IA CHS 
ste ALSCBL an" 24 PROMPT 11 AROT 
ne x? XEQ “T- 25 END 12 PROMPT 
2 A3 ALERG (3 END 
4 a A : E3 AALSL “88” 
rt a A2 <EQ “T* 
SON %6 | 43 ATX 


Je remarque au passage jue non ‘nprimante imprime les 
listages "NORM" {avec sauts entre les labels) à droi- 
de la bande de papier, alors que :'imprimante de Dar: 
semble les imprimer à gauche ??°7 œ'ast pourtant le nmê- 
ne modéle. 


e 






ty 


etournenent de chaîne a2lpna: dieux variantes roins 
encombrantes et plus rapides, omtte tenu de a aoin- 
ire SIZE. 5i vous ne travaillez ue sur 6 saractéres 
seui ie LBL ©Ol est utile, 


t4 


20 


ww 


S1Z 
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54 


1 Vo TIME HUNSW 
( gLLBL *TTT- 24 837 BLLBL *TTT- 26 ARCL 82 UT FRC 35 TUNE 8ÿ 
g26LBL 42 25 ARCL TND * A24LBL 42 27 ARCL 81 uB ST0 PL So GETKEY 
43 ASTO 90 APR 33 ASTO #9 28 RTK 09 BL PL 57 STOPSN 
84 ASHF 27 ASHF 34 ASHF 29 GTO 82 10 3 56 Ë 
35 ASTO 81 à5 ASTO 41 ! 2 
86 ASHF 28eLBL 81 86 ASHF JBL 81 11 RCL pi 34 X=Y 
ASTO #2 29 ATOX 87 ASTO 82 31 ATOX 12 yo21 40 GTO #p 
“ ASHF 30 ATOX 88 ASHF 32 ATOX 15% Fe Let 
#9 XEQ 91 3U ATUX 89 XEQ 9! 33 ATOX 14 .211527 42 E£b 
18 CLX 32 ATOX 18 ARCL 88 34 ATOX 15 + 45 * 
11 KEQ 83 a 11 ASTO 88 35 ABS 16 FRC É 44 3 
12: € $ 12 ASHF 36 CLX 17 STO 45 — 
13 XEQ 93 35 ATOX 13 XEQ 81 37 ATOX 18 J 46 VIEW X 
142 36 XTOA 14 ARCL 81 38 xT0A 19 * 47 TUNE Y 
15 XEQ 83 37 CLX {5 ASTO 81 39 CLX 20 INT 48 GTU Y1 
16 ASTO X 38 LASTX 16 ASHF 48 LASTX 21 X<v? 49 LBL pp 
17 CLA SaSATe 17 KEQ 81 41 XTOR . 50 RCL pp 
18 ARCL PA 4 RDH 18 ARCL 82 42 RDK 23 £4 1 STUFLAG 
41 XT0A XT0A 3EÈ 2 vu 
19 ARCL x 19 ASTO 82 43 s 6 
28 ARCL 92 42 RD 28 ASHF 44 RDH 24 / 92 CLA 
43 XTOA 45 XT0A 25 TIME 53 CLST 
et ARCL Ol 21 XEQ Bt : = 
22 RTN 44 RDN 22 ASTO x 46 RH 26 HMS+ 54 SETSW 
23 GTO #2 45 KTOR 23 CLA 47 KTOA 27 ABS 55 END 
46 .EXD. 24 ARCL 99 48 .EXD. 28 CLST 
25 ARCL * 


UNE APPLICATICUN LUDIQUE DU MODULE 'TIME*‘ : 
UN JEU DE REFLEXES 

Le petit programme proposé ici vous permettra de tes- 
ter vos réflexes. Une fois lancé, ii aïficne l'neure «et, 
à un instant aléatoire, {ait entenare un ‘bip'. Il ne 
vous reste plus qu'a presser uns toucne quelconque, le 
plus tôt possibie après ie bip. Le progranme afficne a- 
lors votre tenps ae réaction, en centièmes de seconde, 
et le cycle recommence, jusqu'à ce que vous décidiéz de 
stopper le progrannme. 


Une remarque préliminaire s'inpose : pour exécuter ce 


programme, ii est nécessaire de disposer vien entendu du 
aoauie TIME, mais aussi au X rUNCTIUNS. 


Examinons à présent ie 118t1ng du programue : 


Ul vos “RFX" y SETSWw 
02 RCLFLAG JU LASTX 
03 STO pÿ 2E 7" 

C4 FIX À 32 XILAM 
U5 STUPSW 33 Cauck 


Les seules lignes syntnétiques du programue sont : 25 
35, 36, 42. Elles peuvent sans inconvénient être remplacées 


1 
© Le 
3 b à Do € 3 l : 1E4, TONE 9, 1, 1E6. 
2 © a © € © S par : » , 
2 4 8 5 & à x à © FR g à Commentaire détaillé du programme : les lignes 02 et 
5 5 3 3528gc<sx 3 © 03 sauvegardent le format d'affichage dans le registre DD, 
RUE 5 US QUES Lt FA la ligne 04 prépare ie format d'afficnage, La ligne U5 ar- 
9 S 8 © ” à É o E 2 $ à rête le chronomètre au Cas où il serait en train de tour- 
CRETE GA TR ag, Dane ner. Les lignes U6 à Uë mettent dans le registre #1 une 
3 5 3 3 a 4 © 0,2 DES 8 valeur initiale aléatoire pour ie générateur de nombres 
£ à à a 3 à à 8 8 2 3 5% aléatoires. À la ligne US commence la boucle principale du 
7 5 © Sa TS dr 8 £ à programme : un nombre aléatoire de secondes est généré, 
3  » À 1e NS 0 u à + (1ignes 11 à 20) et on ne pour qu'il ne pet pas in- 
2,10 0 2.9 2 “ os férieur à 3 (lignes 10 et 21-22). Une alarne est alors 
= 2 a + . u £ 
ä 8 ä £ à 3 3 SL £ 3 5e 3 ' créée pour l'heure courante + le nombre de secondes généré, 
£ » 8 DE ee de 8 + à £ et on afficne i'neure (ligne 33), ce qui arrête le pro- 
4 8 0. ee 8 ramme. Quand l'alarme se déclenche, le progranmne repart : 
“ 2 © © a £ € 3 #4 & € ? rogra r 
Se en QUE. 20S 09 srers S il lance le chrono (ligne 34) et fait un ‘bip'. Puis, il 
. TR TR NS DE D a, 8 e attend une pression de touche pendant quelques secondes, à 
2 a © » À © À 1 % ä » = _P ; re : 
Per Dre LS: SANS ME RE 2 la iigne 36. Si cette toucne est ‘UN', le prograane s'ar- 
6 D à + 3 4 4 à à © DAS 5 rête (test aux lignes 38 à 40, procédure d'arrêt aux lignes 
SN ir PR ME D 5 5 so d 49 à 55). Sinon, le tenps de réaction est afïicné, corrigé 
E 3 ë Ë 8 Te à 2 6 = % à S a d'une constante d'étalo e, située à la ligne 44 : elie : 
o # à sa ue & 2 æ. vaut 6 pour une macnine normale et 3 pour une nacnine accé- 
3 © & 3 © 3 + 3 = © < aut 
« 7 3 3 = et di 2, 0 LS: +, Li G + lérée. 
2 #0 sus Mac M'A .0 g a v 
a 3 © - 3 $ S a # 5 © ol Utilisation : : ; 
5 Er ave 6 15 $ ë s R au a) XEQ "“RFX" : après quelques secondes, L'neure s'af- 
F 3:53 S Sr Dro T1 à CS _ ficne. Dès que vous entendez un oép pressez une tou- 
5 20.0 5 #4 7 sg # 4 à = che. Votre teups de réastion s'afficne alors, et le 
3 7 à 3 # € hu + % + M > 
» a D ae 9 AS ES Re 0 processus recommence. u | 
= 3 S £ ru a S » O à s 9 re b) Pour arrêter le programme, presser ON après un bip. 
ba æ © 0 £ © 0 à > à a » 5 
2 ét. je 3 A © a 2 v 
ô 335% 36344 "$# 7. 3 2 Bon amusement ! 
$ 8 à à & 4 3 2 4 = à va À 
5 3 3N y Ji 2 EU | 
2 a 4. H © Oo a 2 9 S uns Lionel ANCELET 
+ 2 & > 2 a a # «a 5 
»# aq € 9 3 € d 2 +4 a 4 © © û L. 
DS Je 2 à S S à © 8 La POUR SE METTRE A LA PROGRAMMATION SYNTHÈTIQUE : 
“+ e Em 2.9 > ® % 3 sou un programme qui crée d'autres programmes 
ln > m © A € a € Sp TON 
2 A +» a ? s Le 5 3 
mm > © æ# dd © dd 1 +4 à 2 ot : 
£ 4 gs 7 " 8 © 2 LS hA Me 
3 s : e Ê $ 5 à ë 4 5 9 à Nombreux sont as La Programmation or : 
Ha 0 Jane Sc ni cé A Ce 4 A attire par ses possibilités immenses, mais rebute du fai 


de la difficulté qu'il y parfois à créer des instructions 
synthétiques. Heureusement, il existe un moyen rapide et 
facile de générer des instructions syntnétiques, qui est 
d'utiliser le programme décrit ici : à partir des codes 
décimaux des instructions à créer, il écrit directement en 
aénoire programme ces instructions, qu'elles soient syn- 
thétiques ou non. Simple, n'est-ce-pas ? 

La seuie onbre au tableau est que ce programme est 
lui-même bourré d'instructions synthétiques : on est en 
queique sorte confronté au problème de l'oeuf et de la 
poule ... Avant de cnercner une solution varide à ce pro- 
blème, examinons ie programme : il ne fait que 224 octets 
et tiendra donc sur une carte. Je l'ai nommé "LB", par 
référence à un programme publié dans le journal PFPC amé- 
ricain, et qui faisait exactement la anêne cnose, à la 
difiérence près qu'il était pius de 2 fois plus iong ... 
Celui est une version 100 # made in France : cocorico ! 


Le fonctionnement du programme est relativement com- 
piexe, mais son utilisation reste sinpie. Un part du lis- 
ting du programne synthétique à créer. Un le traauit en 
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codes décinaux à l'aide de ia taoie des codes, puoliée 
dans PPC Journal (au Touiouse Chapter) V1 N3, en derniè- 
re page. (Les explications données à la page précédente 
peuvent être utiles, ne serait-ce que pour rentrer en ma- 
chine le programme "LB"). Une fois que tout le progranse 
est traduit en codes décinaux, compter les octets. Soit 
000 ce nombre d'octets. Pour générer ce programme en né- 
aoire centrale, rentrer LBL "++" suivi de + + + + .... 

+ + + XEQ "LB" END. Le nombre de ‘+' doit être égal à 

000 + 12 au moins. Les + servent d'une part à prendre la 
piace du futur programme syntnétique, et d'autre part à 
assurer le comptage aes octets. Ceci fait, exécuter le 
progranze "LB" : après queiques secondes, un nombre de la 
forre 1,nnn est afficné, ce qui signifie que vous pourrez 
rentrer nnn octets au total, et que le programme vous de- 
amande le n® l1. Si vous n'avez pas rentré assez de ‘+', une 
cnaîne alpna où un nonore farfelu est afficné (il s'agit 
du contenu du registre c). 


Rentrer alors le premier octet, presser R/S. Le prog- 
raame affiche alors 2,nnn : rentrer le deuxième octet, 
etc ... S1 vous ne vouiez plus rentrer d'octets, pressez 
simplement R/S et le progranne rentrera dans la procédu- 
re finale. Quand il s'arrête, il suffit de presser SST 
pour se placer sur le LBL “+#+". Il ne reste qu'à effacer 
ce label, ainsi que les ‘+' qui restent en trop avant et 
après les instructions syntnétiques. I1 faut noter que le 
XEQ "LB" placé avant le END peut rester sous la forme: 
XEQ "LB" , ou "LB", voire %%, ou nême «. 


Il existe une procédure de correction : quand, au cours 
du progranne, on s'aperçoit qu'on s'est trompé à l'octet 
précédent, il suffit de faire XEQ #1 au lieu de presser 
R/S. Le programme redemande alors l'octet précédent, à 
a0ins que cet octet n'ait été le dernier d'un registre, au- 
quel cas il recule non pas de un mais de sept octets. Si- 
gnalons enfin que "LB" utilise les ménoires #ÿ# et #1. De 
plus, ceux qui possèdent ie nodule X FUNCTIONS pourront 
remplacer les lignes 81 à 102 par l'instruction XTOA. 


Comment fonctionne ce programme ? Accrochez vos cein- 
tures, nous allons décolier ... Quand on fait XEQ "LB", 
la machine n'est pas en mode ALPHA, donc le flag 48 est 
baissé, donc l'exécution saute au pas #4. AON lève le flag 
48, CLST E RDN efface la pile et place 1 dans le registre T. 
L'exécution est alors transférée au lavel "++": la suite 
des '+' assure le comptage des octets, et on arrive au pas 
{EQ "LB" : ceci pousse dans le registre b l'adresse de re- 
tour du XEQ, sous une forme compactée, et l'exécution est 
rendue au programme "LB". Comne cette fois le flag 48 est 
ievé, l'exécution saute au LBL ÿ#. AUFF rebaisse le flag 
48, les instructions 11 à 39 calculent le nombre d'octets 
disponibles, ies instructions 40 à 50 décodent l'adresse de 
retour, qui est celle du END de "++", et s'en servent pour 
construire un registre c provisoire, dans lequel cette ad- 
resse va être celle d'un registre f## provisoire : les octets 
syntnétiques seront groupés par paquets de 7, et stockés 
registre par registre. 


La boucle principaie du programne est située aux lignes 
73 à 1303 le registre ÿÿ contient le pointeur d'octets; 
son contenu est affiché à la ligne 76, quand le programme 
s'arrête pour demander un octet. Si on a pressé R/S sans 
rentrer d'octet, la vaieur zéro est utiiisée (lignes 77 et 
78). Les lignes 79 et 80 assurent que le nombre entré est 
dans l'intervalle 0,255 , et les lignes 81 à 102 construi- 
sent en ALPHA le caractere correspondant au code décimal 
entré. (C'est pourquoi ces lignes peuvent être remplacées 
par XTOA). Ensuite, le progranne regarde si on a fini de 
constituer un registre de 7 octets. Si c'est le cas, l'ad- 
resse relative au registre ÿf# provisoire est caicuiée aux 
iignes 109 à 120, puis ie contenu de c est modifié pour pla- 
cer RÿŸD au oon endroit (lignes 121 et 122). Les lignes 


123 et 124 stocxent ie registre constitué des 7 derniers 
octets entrés à l'adresse caiculée précédemment, puis ie 
contenu de c est restauré à sa valeur initiale. ALPHA est 
aiors effacé, et, s'il est encore possivle de rentrer des 
octets, on continue. 


Les pas 55 à 72 contiennent ia procédure ae correction. 
Le registre Ÿÿ est décrénenté, et le aernier caractère du 
registre ALPHA est effacé. 


Il faut remarquer que l'imprimante n'interprète pas les 
postfixes syntnétiques comme la macnine ainsi M devient C, 
N devient \, O devient 1, P devient À, Q devient -, et 
zevient * . Ces indications doivent rendre le listing par- 
faitement comprénensibie, sacnant que lies codes nexa de ia 
iigne 45 sont : r4 1ÿ #ÿ ÿ1 09. 
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une enveloppe timbrée et self-adressée, et Je 


comment créer ce programme à partir de rien ? Les 
vous renverrai ie programme enregistré sur la carte. Voici 


Venons-en au problème crucial évoqué au début de l'ar- 
2 dernières pages du V1 N3 du PPC Journai de Toulouse con- 
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L] 1 © C1 = © 
1 sas Le 4 D % 
Oo vo + Sd 
4 “4 © Q Q À © Ÿ 
NS >E 14200 
78. 86 SF 12 
Z1KO 87 FS2 18 
72 ST0L 88 SF 11 
89 FS2C 89 
TABL 82 38 SF 18 
74 RCL 89 91 F5? 97 
75 FSX 22 32 SF 89 
76 STOP 33 FS? 8 
77 FC? 22 34 SF 88 
8. 95 XO d 
79 256 96 x) C 
88 "0» 37 ‘++ 
81 LASTX 38 STO \ 
a 39 “He 
83 OCT 188 RCL \ 
84 XO d 181 CLA 
85 FS2C 11 182 STO L 


de Toulouse, j'ai envoyé un exeu- 


sur carte, à Jean-Daniel Dodin 


Je 


envoyer copie du »rogramue à 


JLHBL "LB" 
2 F5? 48 
33 GTO #4 
34 ACH 

A5 CLST 

36 € 

a7 RD 

38 GTO “++ 


a9+LBL 8 
18 AOFF 

11 RC b 
12ST0€ 
13 He 
14 RCL € 
15 KO) d 
16 CF 16 
17 FS2C 97 
18 SF 16 
19 FS2C #6 
28 SF 87 
21 FS2C 95 
22 SF 86 
23 FSAX 94 
24 SF 85 
25 KO d 
26 FRC 

27 SOL 
28 LASTX 
29 IXT 

38 Rt 

31 + 

32 E 

7 - 

34 STO 88 
35 7 


183 RCL 88 
184 IKT 
185 7 

186 n0D 
187 X#87 
188 GTO 9 
189 RCL 98 
118 FRC 
ii E3 
2e 

113 RCL 88 
114 INT 
119 - 

116 7 
1177 

118 INT 
19 € 


Happy programming ! 


Lionel ANCELET 


2 


CONTE 


U DES REGISTRES: 


36 MOD 
37 ST- 4 
38 € 

39 ST, 88 
48 RCL LC 
41 XO d 
42 F5? 12 
43 SF 93 
44 XO d 
45 “eri 
4 XO C 
47 STO \ 
48 +40" 
49 RCL \ 
58 STO 81 
S1 FIX 3 
J2 SF 22 
53 CLA 

54 GTO 89 


JSeLBL 81 
56 SF 22 
7 E 

58 RCL 9 
39 INT 

68 X=v? 
61 GTO 82 
627 

63 N0B 

64 XOY 
65 X=v? 
66 LASTX 
67 ST- 88 
68 El 

69 ARCL K 


128 + 

121 RCL 81 
122 x) © 
123 RCL TC 
124 STO [NB Z 
125 ROY 

126 STO cç 
127 CLA 


128eLBL 88 
129 ISG 88 
138 GTO 82 
131 ENB 


Ce petit programme est Dien utile pour docu- 


menter les programmes dans la revue. 
de pour chaque registre 


un commentaire 


Il vous deman- 
et l'envoie 


sur l'imprimante: je l'ai utilisé pour le programme 


"INTER", p 10 
source: John Dearing CTR 22-11 ou PPCJ VBN2P17 
31eLSL “DH” 18 "R° ALeLEL *DN° 28 XOY 
82 FIX 8 19 El #2 Fix 4 LR 
33 CF 29 28 X)7? 43 CF 29 22 El 
g4 ADV 21 “+4 44 ADY 23 x)v? 
22 RD 24 “+4 
85+LBL 98 23 ARCL X 35eL8L #4 2S RDH 
@6 “1 ER REG NO?" 24 "+=" 86 *! ER REC 407" 26 ARCL X 
87 PROMPT 25 ACA 37 PRUMPT è7 ‘+= 
98 ENTERT 26 PROMPT A8 ENTER 28 STOP 
39 x(8? 27 ACA CRETE 23 XOT 
18 GTO 48 28 PRBUF 18 LTO 38 38 X<° 
11 “DER REG N0?* 29 € {1 "DER REG ND?° 31 RH 
12 PROMPT 38 + 12 PROMPT 32 ACA 
13 x<Y? 31 XC=Y? 13 xC7? 33 PRBUF 
14 GTO 88 32 GT0 A 14 £T0 38 34 € 
15 xOY 33 FIX 2 15 XCY 35 + 
16 AON 34 SF 29 36 x(=Y? 
35 AOFF 16 6L 41 37 GTO A 
17eLBL 81 26 .EXD. 7 ‘qee 38 FIX ? 
18 RCL L 39 SF 29 
19 x 4 48 END 
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TRUCS 


ET ASTUCES 
SUITE DE Vi Nb 
DMS : 4R 
P°R : PR x=6, t=R,donne x=y,t=x 
5BR : XEQ 
INY SBR:RTN 
DSZ : décrément et saut si 2 


INV DSZ décrément et saut si # 0 

les tests conmparent x et t 

EE inv £E supprime les chiffres de 
ble pour lestests 

1 seul chiffre par pas de programme 

sécial PL ST: 

SE : efface t (R7) 

INV Ct: efface toute la mémoire calcul (pile +RO-RT) 

statistiques: RO2=x, Rl=[y, R2=1,2,R3=Lx, RhæLx?2, R5= 

Exy, R7=x+l 

DD : HMS 


sréciail Ti 58/59: 

CMs efface les mémoires 

Ér : efface t (registre spécial) 

PRGM mm appel à un programme de module. Peut ètre 
suivi de SBR {pour appel dans le module) 

1à c'est fichu pour la traduction!!!! 

étiquettes A-E et A'-E' . À tout seul = XEQ A 

STO et RCL: n°(2 chiffres) du registre sur la 1li- 
gne suivante. 

LBL Cette instruction est suivie d'une instruc- 
tion qui est le nom du Label (LBL/LN) 

les GTO ou SBR peuvent ètre suivis;d'une instruction 
qui envoie au LBL de même nom (GTO/LN----LBL/LN),ou 
de deux lignes à 2chiffres par ligne qui représentent 
le numéro(centaines/unités) de la ligne où le pro- 
gramme doit continuer: GTO/01/36 = GTO 136 . Idem 
pour les tests. Les DSZ sont suivis, avant l'adresse 
nu numéro du registre compteur:DSZ/6/01/36... 

Du coup il n'est pas possible d'exécuter une fonc- 
tion sous condition: x=y?/LN sur HP exécute un loga- 
rithme si x=y,sutr Ti envoie au LBL LN. 

(CE + ... provoque un empilage (ENTER). Des program- 
mes travaillés ainsi sont trés difficiles à traduire 
Les flags sont mis à @ par RST ou CP 

le Flag 8 levé arréte le calcul en cas d'erreur, 
sinon le calcul se poursuit avec un affichage cli- 
gnaotant. 

STAT: Ri=iy, RO=Ly2, R3= N, RhmLx, RS=Lx2, R6=Ixy 
résultats à l'affichage y, dans t, x 
si t n'est pas modifié par le programme, 
gnenté de L par la Ti 


garde: indispensa- 


il est au- 


Prt 5 TPTx 
INV WRITE: demande la lecture d'une carte 
OP 


10=SIGN,1l=0? l3=corrélation, 12 régression linéaire 
1bk=y(x),15=x(y) 


18= lever flag T si pas d'erreur 

19= lever flag 7 si erreur 

20--29 ajouter 1 à RO--R9 

30--39 enlever L à RO--R9 

LO= lever flag T si inprinante (58c). 


En fait la fonction SIGN est légèrement différente sur 
4P de la norme mathématique. Elle donne O pour un ca- 
ractére alpna et 1 pour O . Pour traduire le OP 10 de 
Ti il faut donc ?aire: 

x#0? 


SIGN 






Ti exécute d'abord le contenu des (}) les 
intérieures, puis y , puis #,/ puis + et —, si- 
non de la gauche vers la droite. 


vous avais promis dans le dernier numéro une version 
iorée du programme PILO. La voiçi. 
gne par ligne: 
Zaizialisation 








J annonce La distance imposée pour le vol 
ls annonce les réglages äu ?ilote automatique 
17 la nauteur de croisiére 
22 la vitesse en km/h, transformée en nombre d'in- 
zervalies 
23 3ouùcle de montée ou de iescente 
34 sombien de minutes,ENTER, angle {positif=non- 
: iée, régatif=descente) 
Ê=uu correction de la vitesse: augmente dans ia des- 
: cente, dimunue dans la zontée 
26-50 affiche la distance parcourue en Xn 
51-35 affiche la auteur en nétres 
59-62 si la nauteur est supérieure à L'altitude die 
: croisiére, va en O1 
54-05 est-ce jue la hauteur 2st inférieure à 2? aller 
sn .25 


suite à la boucie suivante de la croisiére 
si la croisiére anéne à dépasser 2000 ka, 
ne d'essence 
73 suite de la zontée 


67-68 
63-72 PART 


{ou de la descente) 


7L278 Croisiére: si distance parcourue supérieure à 
2000 Xa, return 

79-83 sinon stabiiise l'avion à l'altitude de crai- 
siére et à l'horizontale. 

84-86 les afficnages seront 10 fois noins nombreux 
au xm qu'en pilotage nanuel 

87-9k effectue l'étape de la croisi et retourne 


95-100 si l'altitude est 

101-113 si la distance a été respect 
posé et nouvelle partie. 

114-117 CRASH 

118-121 vous avez manqué l'aéroport 

122-126 panne d'essence 


ér 
inférieure à -1,CRASH 
ée à 5 k«n prés, 


le décollage est facile, mais l'atterris- 


Attention, 
vous ne pouvez pas régler votre 


sage est trés délicat: 
vitesse! 


Remarque: les programnes 3ases et Facto (ailleurs 
dans ce numéro) sont également des traductions de Ti. 


Dans ces cas l'original est à trouver dans une revue. 
gueLB “PILOTE” S3 PROMT Sn 38 A6 | 
82#LEL À UE 99 X)Y? 
35 XOY 68 GTO 88 
83 CF 21 188 CTO 49 
36 INT 69 RCL 93 
84 FIX 8 and 7 de 181 RCL 83 
85 CF 29 : 71 KV 182 2880 
D 38eLBL 28 72 GTO 12 183 - 
87 STO 83 184 ABS 
39 RCL 81 73 G10 83 
68 STO 84 re 185 5 
DRE À RQ Na 186 XC2Y? 
18 AVIEN Sp 187 GTO 8 
42% CL 83 : . 
11 PSE Re 2 188 “POSE. 
12 “PILOTE AUTO. - né 189 AVIEN 
4 P-R ="? 
13 AVIEN 118 PSE 
45 ST+ 83 78 RTH 1 e 
14 PSE 111 “BRAVO … 
. D 46 “DIS.=" 79 RCL 85 
15 “HAUTEUR 201) 112 PROMPT 
16 PROMPT 47 ARCL 03 os 113 GTO À 
48 “+ kW” 81 CLX 
17 STO 85 
18 “vi. 20m 47 AVIEN ns LI4OLBL 89 
58 PSE 83 STO 8 à 5 
19 PROMPT 115 “CRASH … 
SL XOY 84 RCL 82 : 
28 68 DE Ni 116 PROMP 
a / 5 ne 117 GTO 89 
22 ST0 82 on 
23 “IST. (KM RU L186LBL 18 
35 “HAU.=" 119 “AUX VACHES..… 
24 PROMPT PA 3e 
25 RCL 82 6 RCE EE 128 PROMPT 
2% / LE Pur 121 GTO 18 
æ / Ds SE 122481 12 
68 RCL 85 mn 
29 IHT ie 123 “PLUS DE JUS, 
38 STO @6 61 XV? 124 AVIEN 
62 XE0 81 $4 RTK 125 PSE 
63 PSE 
HALL 43 126 GTO 89 
rs 64 RCL 84 9SeLBL 85 
32 “nIKté ue Si 127 END 
97 RCL 81 
APPLICATIONS 


Les importations, qu'elles viennent de professionne!s 

ou de particuliers doivent acquiter des droits de dou- 
A DS 

ane à leur arrivée en France. Le taux courant étant 



















de 20% ( en fait simplement le montant de la TVA)il 
faut y faire attention. Mon expérience pratique donne 
ceçi: 
Les livres venus de Corvallis Software Inc {CTR et 42- 
SD) ne sont pas axés, 
Le PPC ROM accompagné de son manuel m'a 18r 
L'EPROM 30x et les =ZPROM's ont été taxée 4 
tenant compte de La valeur déclarée sur et 
du cours du jour äu $: plus de LO0,- pou - 
pour 55$ 4'ZPROM's. De plus comme les =PROM valent 
suivies en 7acance, j'ai eu droit à ne ie 29F 
avec queiques frais fixes, total 96,50F. 
Notre ami Ztienne Poupée, animateur de la qui 
produit certains accessoires décrits ians e nous 
avait pas dit qu'il avait eu les honneurs de presse! 
loir L'Ordinateur de ?oche, n°1, p22,23 et 24, tienne 
Dies st i 

és dans XeyNotes- le 3 st 

» 2ais laisse le ronbr par- 

re 7 Cela peut ètre génant stile. 
ie vente ITC de À taxés b4 





PPC-T N 1 
SEPTEMBRE OCTOBRE 
1982 P8 


SUR LE MARCHE 


J'ai vu au supermarché du Mirail (à Toulouse) des 
iettes pour vidéocassettes" en bois (ou plastique 
recouvert de skay qui ont juste le bon format pour lo- 
ser une HP-L1C et son imprimante + des accessoires.Pri 
127,65 !!! Cela ou des choses analogues doivent se trou- 
ver dans tous les grands magasins . 

acques Vaucelle "La Chasserie" 35133 Romagné, tel 

6 (99) 98 33 69 peut vous inclure dans votre 4P-h]1C 
tous les nodules que vous voulez. Il peut aussi vous 
grouper 3 modules X fonction dans le même module ,met- 
tant toute la Xmémoire dans la même boite pour 150 F. 
il peut aussi vous fournir ces modules à un prix a- 
rantageux. 


J 
: 


Data Zase 1 


Il s'agit d'un ensemble de programmes destinés à gerer 
une base de donnée sur le lecteur de cassettes. Ces 
programmes n'utilisent pas les Xfonctions.Semble com- 
plet. Le traitement risque d'étre un peu lent. Les pro- 
grammes peuvent étre fournis sur cassette ou sur £PROM 
SHAM-REG 1: 


Du même concepteur un jeu de programmes de régression 
linéaire (une version 2 est également disponible) 

34 pages de détails contre 17 F et une enveloppetim- 
brée à 5,80 (préciser DATA BASE sur l'enveloppe). 


Fr 


vendu par Shammas Software Service 1533 F 
Drive Richmond Virginia 23229. 

prix indicatif: Dta Base sur cassette 110$ , sur 
> 450 $ ( avec 1'EPROM Box), Sham Reg cassette 
39 
Et on parle français là-bas! 


Honey Grove 


Sas 
(mais manuels en anglais. 
Claude Roeltgen, membre de PPC (n°?) vous 
programme d'échec respectant correctement les régles 
du jeu. La vitesse est faible (lO minutes par coup 

au meilleur niveau) et le niveau sans doute assez 
léger. Il n'était pourtant pas évident d'arriver ne 
serait-çe qu'a faire jouer la machine! 

Ce programme est vendu (1000 FBelges-200 FFrançais) 
Il intéressera sans doute les auteurs de programmes 
de jeux. Sa principale caractéristique est l'utilisa- 
tion d'un adressage compilé sans labéls qui ne peut 
étre réalisé que par lecture d'une carte ou codes 
barre. Le premier jet doit étre introduit par un pro- 
gramme en ROM comme LB (PPCROM) ou par un interface 
spécialisé (ou par création de codes barre par un 
ordinateur. Ce programme posséde un systéme de pro- 
tection contre les curieux sophistiqué mais non pas 
incassable. Je regrette personnellement ce systéme 
car je ne vois pas quel interet peut exister à jou- 
er aux échecs avec la k1C, alors que l'étude du fon- 
ctionnement du programme est lui, trés intéressant. 
Valentin Albillo nous avais donné l'exemple en ce 
domaine. 


propose un 


livre de Kolb disponible 100 F + enveloppe 


Pour les amateurs de mathématiques: William Kolb 

un des plus jeunes trés ancien membre de PPC USA 
vient de sortir un livre intitulé "Curve Fitting 

for programmable Calculators", broché 21x27cm 

pour 12$ (comptez 2$ de frais de port et indiquez vo- 
tre numéro PPC). 38 courbes sont présentées. 

Sans l'avoir vu, mais connaissant de réputation l'au- 
teur (un "fondu" de la programmation) je suis sur sur 
que ce bouquin est super. s'adresser à IMTEC 

PO BOX 1402 3ow Md 20716. Je vais écrire pour de- 
nander les conditions pour le club et si possible com- 
nander quelques exemplaires. 


DISFOHIBLE 4 TOULOUS 
Tout augnente! Je suis obligé de faire passe 


J 
le prix je Calculator ps and Soutines 
(ce n'est pas Le benefice qui augmente 

Pour l'instant P-System Dictionnary r 
grace à ‘me pronotion iu ‘ournisseur. 

Je ne sais pas zendant combien de temps i 
iisponible car il y a des problémes avec 

Les premiers à passer commande l'auront, 

seront remboursés. 
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rai dés que 


faut donc passer commande, ce que je fe 
conmandes: 


j'aurai reçu un nombre suffisant de prix 
franco 25 F. 
Documents préparatoires de la PPC East [Cost Conference 


80 pages (LO F + 10 F de port) contient des articles 
sur: compilation synthétique sans label, le converti:s- 
seur HP-IL, des schémas d'alimentatrions pour la HP et 
les périphériques, un logiciel de simplification de 
l'utilisation de la cassette, interpollation linéaire 
et non linéaire sous controle statistique, exemple 
d'application du muitimétre numérique, une voix en 
français pour la HP-h]1C(avec shémas), commentaire 

sur l'imprimante HP-IL. 

(photocopies) 

Des "Overlay" en papier , non perforés sont disponibles 
au prix de 1 F pièce (fournissez l'enveloppe ). La plus 
part des nouveaux adhérents en ont reçu un échantillon. 
Ils s'utilisent posés sur le clavier et fixés par un 
morceau de scotch. L'avantage de ne pas avoir de per- 
foration est que cela laisse la place pour imprimer 
toutes les fonctions des touches sur l'overlay. Bien 
sur l'usage quotidien n'en est pas commode, ce ne sont 
que des instruments de travail, des brouillons avant 
la constitution (longue et laborieuse) d'un overlay 
standard et définitif. 

AUTOCOLLANTS: 


Reproduisant l'en téte du jounnal, pour votre sac,... 
la feuille de 7 autocollants, 5,- + enveloppe timbrée 


Résumés de fonction autocollants: 
d'aide mémoire, 
les overlay. 
Emplacements prévus: HP-IL (fonctions de Mass Storage, 
imprimente,HP-IL, valable aussi pour l'ancienne im- 
primante) sur l'imprimante ou le lecteur de cassette 
Xfonctions, Time module et Wand 


prévu pour servir 
peuvent également étre utilisés sur 


sur l'imprimante 

Lecteur de carte: sur le lecteur 
au dessus de l'emplacement pour cartes, 

PPC ROM : sur l'imprimante. 
Bien sur vous pouvez les placer ailleurs, on peut mê- 
me les plastifier (avant de les poser) à la bombe, mais 
le nieux est de les recouvrir de Vénilia adhésif tran- 
sparent. 
Il est également trés commode de les placer sur un 
rectangle de plastique de 60x115 mm, d'un coté lec- 
teur de cartes, X-fonct,Time,Wand, de l'autre Mass 
storage-HP-IL-Printer et PPC ROM. 
Le nom de la fonction est accompagné soit du numéro 
XROM, soit pour tout l'HP-IL du numéro eGOBEEP.Je 
vous rappelle que cette fonction synthétique (L/167) 
quand on lui fourni l'argument voulu exécute ou place 
en programme l'instruction correspondante. 
l'autocollant 5 F .Je peux vous faire la carte pour 
4 franco ( pour l'autocollant, prévoir une envelop- 
pe 


| PEL FSe | 
timbrée à 8,50 
ER 


Le coin des débutants 


Nombreux sont ceux qui rejoignent notre club aprés un 
achat récent d'une calculatrice et aprés avoir décou- 
vert que leur machine a plus de possibilités qu'un ex- 
examen sommaire ne le laissait voir. : 

Cette découverte est le plus souvent déconcertante et 
la solution est loin d'étre évidente. 

La solution serait un stage d'un mois à plein tenps 
organisé par un organisme sérieux. Le coût de ce sta- 
ge rend cette idée irréaliste. 

Or la lecture d'un livre ne parait pas adéquate pour 
résoudre ce probléme, car l'essentiel est les travaux 
pratiques. 


Je vais donc vous donner içi quelques conseils de mé- 
thode, en gros la façon dont j'ai moi-même procédé. 
Sur la programmation elle même je re connais rien de 
mieux que "Les proverbes de programmation" par Henri 
LEDGARD (en vente partout) où, dans un premier temps, 
vous pouvez sauter les exemples. 

Ces quelques régles de bon sens, valables pour tous 
les ordinateurs et tous Les langages sont le 3. À. 3A 


du programmeur. 












Ensuite lisez le manuel de 7otre sez=le tous 
les mois. Relisez-ile au moins tous les ans, même quand 
vous serez un expert. Ajoutez-y des notes au crayon 
rédigées dans VOTRE Langage. 
"ASS ST- -CTL FS- PRINTER- 

CREATE 27 AUTOIO 63 aca 

DIR 26 FINBID éé ACCHR 

MEMWM 29 1MA é7 ACC 

PURGE 3e 1ND 6e ACSPEc 

RERADA 31 INSTAT 6? acx 
Ni, 1 READK 32 LISTEN 7e eLDSPEc 

READP 33 LocA 71 LIST 
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Puis lisez les journeaux. £n France l'Ordinateur de 
Poche, l'Ordinateur Individuel, sont pour nous les 
meilleurs. Lisez le courrier des lecteurs et le plus 
possible d'articles. Il y a toujours quelque chose à 
glaner dans un article. Sautez ce que vous ne compre- 
nez pas, vous y reviendrez plus tard. Lisez bien sûr 
PPC-T . Au début laissez de coté PPC-USA, à moins que 
vous ne connaissiez trés bien l'anglais. 
Dans tous ces journeaux, lisez surtout LES PROGRAMMES 
Avec un peu d'entrainement un programme se lit comme 
un livre. 2t ensuite utilisez dans vos propres pro- 
grammes ce que vous aurez vu. 
Je souhaite vivement publier dans “le coin des débu- 
zants" vos programmes et je sounaite encore plus vi- 
7ement que d'autres débutants les commentent et pro= 
posent des modifications. 
À ce niveau, disons pendant 6 mois, ne vous souciez 
pas trop de programmation synthétique , inutile de 
vous ruiner en accessoires. Une HP-41C, 1 module de 
mémoire vive, un lecteur de cartes, c'est parfait. 
L'imprinante est un luxe utile. Le reste, vous ne 
pourriez rien en tirer. Vous reviendrez, plus tard 
sur les autres articles de journeaux, ne vous laissez 
pas noyer. 
Deux détails pour finir. Quand l'écran affiche 
(123,00 LT) vous savez que 47 est une puissance 
de 10. Mais ARCL X donne en alpha 123,00E47. C'est la 
aême chose. 
Pour introduire X<>21 il faut XEQ,Alpha,X,<,>,Alpha, 
SA 

Bonne chance! 

J-D Dodin 


CIRE 
CHAPTER 


Quelques données sur PPC 


En 1979, date d'édition de l'annuaire PPC, {1 y avait 
moins d'une dizaine d'adhérents français, la plus part 
inactifs. Depuis sa création en 1974 par R.J. Nelson, 
le PPC Club avait alors enregistré plus de 3600 adhé- 
sions. 
La sortie de la HP-41C, la découverte de la program- 
mation synthétique et Le livre de Bill Wick es ont 
donné un coup de fouet et en Juin 1982 le cap des 
9000 numéros attribués était largement dépassé. À la 
date ou vous lisez cet article les 10 000 seront sans 
doute dépassés. 
L'évolution est si rapide qu'il n'est pas inutile de 
revoir le calendrier. . 
Juin 1979 annonce de La HP-41C 
Aout 1979 commande à Hewlett-Packard du PPC ROM, 
accompagnée d'un chéque de 5 000$ et dé- 
couverte des fonctions synthétiques 
Décembre 80 sortie du livre de B11l1 Wickes 
Février 1981 les programmes du PPC ROM sont défini- 
tivement arrétés et envoyés à H-P. Le tra- 
vail sur le manuel prend son allure de 
croisiére 


Juin 1981 J'adhére à PPC, 3 jours trop tard pour 
commander le PPC ROM 
Aout 1981 deux ans exactement aprés la première 


lettre à HP, sortie des premiers PPC ROM 

Aout-Dec 81 les membres de PPC SantaAnna expédient 
5000 exemplaires du PPC ROM et 10 000 ex 
du manuel ce qui provoque un “black out" 
du club pendant 6 mois. 

Septembre 81 création du Chapitre de Toulouse par moi- 
même et de celui de Paris par Lionel An- 
celet 

Janvier 1982 création de PPC-T journal tiré ä 15 ex- 
emplaires 


Février 82 première réunion de PPC Toulouse 


Juin 82 Le journal PPC-T devient seul journal PPC 
sur la France avec l'accord des deux cha- 
pitres 

Juillet 82 Déclaration à la préfecture de Toulouse 


du club de Programmation Personnelle sur 
Calculatrice. 


Deux aspects: le club et le journal. 
Le club: sans but lucratif (il n'y a aucun salarié). 


Chaque membre fait son possible pour aîder les autres. 
Ceci est plus facile si des contacts faciles existent, 
d'où l'interet d'une 'mplantation locale. C'est "l'en- 
traide". 

Le club fait également fonction de groupement d'achat 
et diffuse donc à ses adhérents des accessoires (li- 
vres, classeurs de cartes...) à des prix souvent trés 


avantageux. Bien des éléments ainsi diffusés ne sont 
pas disponibles ailleurs. Il entend également promou- 
voir la création en France d'accessoires pour nos ma- 
chines et assure donc une certaine publicité gratuite 
à ceux-çi. En échange de cette publicité une réduction 
de 15 à 20% aux membres du club est généralement ac- 
cordée par ces fournisseurs. 

Le journal: Géré à Toulouse pour des raisons pratiques 
{l est ouvert à tous. Il publie des extraits des let- 
tres reçues (beaucoup trop nombreuses pour étre toutes 
publiées), diffuse tous les trucs et astuces que les 
adhérents signalent et tous les programmes proposés 
par ceux-çi, aux conditions pratiques çi-dessous: 
Dans la période de création qui est encore la notre 
tout est accepté qui posséde un quelconque interet. 
Petit à petit le standard PPC va s'imposer, qui est 
le suivant: 

- Il est indispensable que les programmes soient des 
originaux. Au cas où {1 s'agirait d'une traduction 

ou d'une amélioration significative d'un programme 
déja publié ailleurs, il est indispensable que les 
références du programme d'origine soient citées de 
façon explicite. Les améliorations, même légères, de 
programmes publiés dans PPC-T sont évidemment trés 
vivement souhaitées. 

- Les programmes publiés restent la propriété de leur 
auteur et toute utilisation commerciale est soumise 

à l'autorisation de l'auteur. Par exeption à cette 
régle tous les chapitres de PPC sont autorisés à uti- 
liser tout le contenu de notre journal, à seule char- 
ge pour eux de préciser leur source et de nous faire 
parvenir un exemplaire de la publication. 

- Le fonctionnement des programmes n'est pas garanti 
par le club et toutes précautions doivent ètre pri- 
ses pour un usage professionnel. 

- Les programmes doivent ètre fournis sur cartes ma- 
nétiques. En principe les cartes sont conservées par 
le club qui peut en faire des copies sur demande 
(contre cartes et enveloppe timbrée). Si les finances 
le permettent un jour, des cartes neuves seront re- 
tournées (sur demande expresse seulement) (faites le 
rapport du prix des cartes à celui des timbres!). 

- S'il n'y a vraiement pas moyen de faire autrement 
vous pouvez envoyer un programme sur cassette. Celle- 
çi sera alors retournés avec le prochain envoi. 

- Un listage sur papier nofrest bien venu. IL est in- 
dispensable pour les accessoires rares (modules..). 
Sinon ne pas oublier de donner la signification XROM 
de chaque fonction utilisée. 

- Une description du programme accompagnée d'un com- 
mentaire ligne par ligne est nécessaire. 


Comment ëcrire? 

Que ce soit pour un programme ou un article 11 faut 
taper à La machine, avec un ruban noir neuf sur une 
largeur de 13,5 cm maxi et en simple interligne. Ne 
vous souciez pas de mise en page ou de taille de ca- 
ractéres. 

Je n'ai pas de dactylo et je perd trop de temps à ta- 
per les documents manuscrits que je reçois. J'ai pré- 
vu les dates de sortie du journal pour qu'elles cor- 
respondent aux vacances scolaires (je suis prof), mais 
pendant l'année j'ai quand même peu de temps à consa- 
crer à la machine à écrire. 


Qui fait quoi? 


Vu le nombre d'accessoires disponibles, il n'est pas 
possible(serait-çe utile?) de les posséder tous, même 
au club. Chacun doft se spécialiser. Je souhaite me 
spécialiser dans: + 

- mise en page et édition du journal 

— programmation en Microcode 
Je compte sur vous pour le reste. En particulier il 
faut des articles pour les débutants. Je suis persua- 
dé que les débutants eux même sont les plus qualifiés 
pour écrire de tels articles, ou au moins pour les 
provoquer par leurs questions. Toutes les initiatives 
seront les bienvenues. 


Jean-Daniel (7226 T l)Dodin 


PPE Fsc: 
EEE 
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Bien sur de nombreux échanges de vues ont été faits. 
Ces réunions étant assez informelles il est difficile 
d'en faire un compte rendu. En fait il est vivement 
recommendé aux adhérents extérieurs à Toulouse d'2s- 
sayer de se regrouper à partir de la liste des aûhé- 
rents publiée dans le journal , mais également en 
cherchant autour d'eux les clubs du même genre dans 
les MJC ou en faisant de la publicité chez les reven- 
deurs 4P pour recruter pour PPC. I1 n'est même pas 
inpossible d'envisager parfois une participation de 
membres du club assez éloignés. 

Nous avions , à cette réunion du 12 Juin la présence 
d'Etienne poupée, venu spécialement pour nous avec 


son imprimante 30 colonnes et son EPROM Box. 


Réunion du 3 Juillet 1982 

Cette réunion avait été décidée le 12 Juin, mais les 
circonstances devaient lui donner une importance tou- 
te particulière. En effet j'étais amené à proposer de 
créer une association loi de 1901 et un projet de 
statuts était joint à la convocation. 

La réunion commençait par l'examen du courrier reçu, 
puis certaines dispositions étaient décidées quand 

au journal, en particulier la disjonction de la co- 
tisation et de l'abonnement, indispensable pour une 
inscription à la commission paritaire des agences de 
presse et publications. 

Ensuite l'examen des statuts était fait article par 
article et la version définitive adoptée (envoi contre 
une enveloppe timbrée à 2,30). 

Puis le bureau était élu, composé de: 

Président J-D Dodin 

Trésorier Jean-François Sibille 

Secrétaire Jean-Luc Basso 

Il a également été décidé d'accepter un peu de publi- 
cité dans le journal (tarif sur demande) 

La discussion a ensuite tourné à batons rompus sur la 
programmation de notre chère machine. 


M. CODE HOMAS 


D'abord quelques notions générales. Pour nous le Mi— 
crocodeest ce langage particulier utilisé par HP pour 
donner des fonctions aux calculatrices et leur donner 
leurs caractéristiques. Ce langage utilise des pro- 
grammes comparables à ceux, que nous appeillerons "“stan- 
dard" dont vous avez l'habitude, mais avec des instru- 
ctions différentes. En fait ces instructions sont sous 
forme de nombres. Les noms utilisés ont été choisis 

par les pionniers du club, en particulier Paul Lind 

et Richard Collett, pas par HP. On appelle ces noms 

des “mémoniques", car ils facilitent l'apprentissage. 
Prenons un exemple. Vous savez ce qu'est LBL 03 et à 
quoi sert cette instruction. Mais il faut s'étre in- 
téressé à la programmation synthétique pour savoir ce 
que signifie "O2"; c'est pourtant la même chose. 

En microcode on a déchiffré une instruction "3E0".En 
constatant son effet, les pionniers ont baptisé cette 
fonction "RTN". Mais la L1C connait "3E0" et rien d' 
d'autre. 

La principale difficulté pratique vient du fait que 
rien n'est prévu par HP pour que le microcode puisse 
étre utilisé par tout un chacun. Il a fallu tout faire 
soi-même, d'où la création par divers constructeurs 

des "EPROM 3ox" 

Une EPROM ou Erasable, Programmable, Read Only Me- 

nory (Mémoire norte programmable et effaçable) est 

un circuit intégré (une "“puce") trés particulier. 

C'est une mémoire qui est donc faite pour conserver 

des instructions ou des données. Elle peut s'effacer, 
aais tout en mêne temps et avec des rayons ultra- 
violets (une sorte de Memory Lost). £lle peut se pro- 
granmer, octet par octet, chaque octet étant désigné 
par son adresse dans L'EPROM, en appliquant une ten- 
sion de 25 Yoits. Vous n'avez pas 25 Voits dans votre 
ÆP et vous ne pourrez donc pas la programmer. 

Four lire la nénoire, pas de probléme, le 5 Y suffi 
faut-il encore *:ransmettre À la HP ces codes dans 1 
bon ordre, c'est ce travail de lecture qui est réa- 
lisé dans L'IPROM 30x. 

Revenons sur la programmation.lil faut donc du 25 V et 
un app reil autre que la %P. Le chapitre de Toulouse 











est zaintenant équipé avec un SOFTY. Mais il y a une 
iifficuité supplémentaire. En effet les ZPROM enregis- 
trent des octets (8 bits) et les instructions (ou “mots! 
“nots") microcode de la HP sont sur 10 bi ( i 
HP!). Le club a pris l'habitude, à la sui an De 
Arms de noter ces instructions sous Le © . 
C'est à dir chiffres nexadéc 

sentant 10 bi dires 2). dTt.s S ÿ 
l'instruction s", ou de "poids 

représentés par un chiffre nexadécimal c 
£tre © {binaire 00), 1 (01}, 2 (1C) ou 2 3 
tits de iroite { ou "bas", ou " ie poids - 
ant représentés classiquement par dieux e- 





OM 30x une 
(elle est ap- 
ROM renferme 


xadécimaux (k bits chacun). Dans 1 
EPROM renferme les deux premiers tits 
peiée U2 pour “Upper 2"), une autre EP 
les 8 bits suivants (L8 ou Lower 3). 
Nous sommes susceptibles d'utiliser 3 types d'EPROM 
désignés dans les magasins d'élect ronique sous les 
codes 2716,2732 et 276, Le 27 correspond à une ca- 
tégorie d'EPROM et les deux autres chiffres (16,32 et 
64) au nombre de K bits. 1 K est une unité d'informa- 
tique égale à 106b, donc L X bits= 1064 bits. Comme 
il y a 8 bits dans un octet il y a donc 16/8=2 X oc- 
tets dans une 2716, h K octets dans une 2732 et 8 & 
octets dans une 2764. 

Ces circuits sont actuellement bon narché et les prix 
baissent. Une 2716 coûte à Toulouse 38 F, une 2732 

68 F (Proélectronique, 5 Aout 82). 

Comme nous l'avons vu il faut au noins 2 Epromà la 
fois. 

Regardons la structure de U2. Il y a 2 bits à ranger 
par mot, et donc 16/2= 8 K mots pour l EPROM. ?our 
ranger 8 K instructions il faut donc une 2716 et deux 
2732 (ou une 2764) soit 174 F pour 1'équivallent du 
PPC ROM, ce qui n'est pas cher. 

N'oublions pas que Ll'EPROM Box peut contenir aussi 
bien des programmes comme ceux que vous connaissez 

et que vous savez donc faire que des programmes en 
microcode, et que ces programmes peuvent ètre trés 
longs, n'occupent pas de place dans la mémoire vive, 
laissant disponibles les 319 registres. Ils sont éga- 
lement toujours disponibles dés l'allumage. Si une 
exploitation en série s'avére un jour nécessaire, Li 
est toujours possible de faire faire des copies de 
l'EPROM par HP dans un module standard (minimum 250 
exemplaires, à environ 450 F l'unité). 


Les bases du microcode: Le microprocesseur: 
N'oublions pas qu'il n'y a aucun rapport entre ce que 
nous allons voir et ce que vous connaissez déja. 


Les unités utilisées ici sont: 


le bit : O ou 1 
le digit: qui fait k bits ou un chiffre hexadécimal 
L'octet: . 8 ds deux $ ® 


Le registre qui fait 56 bits, T octets, ll digits 


Le microprocesseur a pour ses besoins propres 12 mé- 
noires baptisées faute de mieux registres. Leur nom 
a été choisi par les pionniers 


Registre_!_bits ! description 
A ! 56 l registre arithmétique 
B ! 56 ! registre arithmétique 
C ! 56 ! registre arithmétique principal 
q ! 
M ! 56 ! registre auxiliaire (STO/RCL seulement 
x ! 56 ! registre auxiliaire (STO/RCL seulement 
! ! 
G ! 8 ! registre auxiliaire (STO/RCL seulement 
! ï 
P 1 à ! pointeur (des digits dans A,B et C) 
Q { à ! pointeur (des digits dans ÀA,3 et C) 
! ! un seul pointeur peut Ître itudié à 
! ! fois (sélectionné) il est alors ba- 
! ! ptisé "R" 
! Fr 
PC ! 16 ! pointeur de programme (adresse des 
! ! instructions en zicrocoée) 
! ! 
ST ! 8 ! registre d'état (flags de T à 0, de 
! ! gauche à droite) 
T { 8 ! registre "TONE", active le bip 
XEY 18 ! tampon de clavier, chargé quand une 


touche est pressée 


La structure des registres principaux 


Les 3 registres A,3 et C sont partagés en zones e: 
plus part des opérations arithmétiques peuvent étre 
effectuées sur une zone seulement, ou encore sur une 
zone délimitée par les pointeurs. Les zones soht Les 
suivantes, comparées À celles d'un registre courant, 
X par exenple: 





À 








antes sont caractéristiques: 
3igne à zantisse MS {13) 
(0 at 1} 
osant {S 2) 
È ) 
: 
5 Diet. = 
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CAT 2 CLPY 
PPC ROM 2C KROMTST 
X<2>ROM MELBROM 1R 
VEST PSIZE 
z<>T PPACK 
Y<>z DIs 18FE 393-268 152 4 
BCDBIN 2-D 18FF 20-838 LL 
GTOROM 1-D 
RXR KEY 1188 883-283 30 
RKL PKEY 1181 84E-132 C=9 ALL 
K+Y RDVY?? 1182 PES-3A8 RIT 3CX) 
SxL CHRS$ 1183 389-C21 
NSTO NUM 1184 82-882 ?HC GO 2802 
NRCL RDEL 
Te R#& 
YP L$ 
CODE LDEL 
DECODE RHASTO 
EN CLRKEY 
DE 


Les premiers essais de programmation en microcode: 


Le PPC ROM 2C est composé d'une EPROM 2716 et d'une 
ELPROM 2732, progranmées en langage machine (microcode) 


Analyse des fonctions: 

X<>ROM donnée une adresse de k chiffres à droite de 
X (obtenue par "CODE"), rend: en X le micro- 

code situé à cette adresse en S£&X, l'adresse en ADR. 

En Last X l'adresse incrémentée de 1. 


Y<>T font comme X<>ÿ, ce que l'on attend d'eux 
Z<>T 

Y<>2z 

BCDBIN étant donnés 3 chiffres (hexadécimaux ou dé- 


cimaux) à gauche de X, les traduit en digits 
hexadécimaux en S&X de X. Place en Last X les 3 chif- 
fres d'origine. 
GTOROM donnée une adresse en X (obtenue par CODE") 

. transfére l'exécution du programme à l'adres- 
se indiquée. Si le programme reçevant est en langage 
machine il est fréquent que la machine se plante. 

RXR effectue une permutation circulaire dans X 

vers la droite, c'est à dire que le digit de 
droite est transféré à gauche et tous les autres dép 
laçgés à droite. 


RXL idem, mais à gauche. 

X+Y effectue l'addition de deux nombres hexa- 
décinaux. 

SXL déplacement de X d'un bit vers la gauche, 


s 


avec mise à O du bit le plus à droite. Xe 
fonctionne pas sur ma machine. 


NSTO donnés un nombre en Ÿ et un numéro de regi- 
stre en X, range le nombre dans le registre. 
à 2 ; 
NRCL donné un numéro de registre, place en X le 


contenu de ce registre. Ce contenu n'est pas 


"normalisé" au sens de la programmation synthétique. 


Fe "Ton" programmable. Donne un son variable 
selon deux nombres en X et Y. Utilise 3CDBIN 

TP pause variable en fonction du contenu de X. 

EN compacte 10 caractéres alpha selon la néthode 


de Jack Schwartz ce qui permet de les ranger 
dans un seul registre. Met le résultat en X (rangement 
par STO0), 


b1 


fait l'opération inverse, décode le contenu 
du registre X pour redonner 10 caractéres a 
CLPV efface le flag interne qui signale un pro- 
gramme privé. Si le programme s'était arrété 
sur un STOP renvoie le pointeur à la ligne O1. Un pro- 
gramme privé ne l'est plus, mais toute ’entative de 
le copier restitue le PRIVATE.Zffacer le ©ND supprime 
finitivement le brivé. 
XBOMTST Teste les ROM dont on lui donne le numéro 
XROM en X. Dans ne boucle incrémentant la 
3 PSE suivant XROMIST n'est effectué 
iste. 3inon ii est sauté, idem si on 





a suite du ?20M 7 
programmable conme XX 
programmable 

e en alpha (donnée ne adresse), 2'a- 

















L> 199 


dresse suivie du code 2h4 et iu code +42 
(comme 2üuh mais en isolant Les 2 2its de iroite), 
l'adresse +1 an Last X et les composants du code 
:u:2 respectivement en et X. 
2-2 iécode 1 netez à iroite de X et l'ajoute 2n 
alpha 
D den mais pour ! nt 
piace le code ie ss 
permet de sonnait aç Lors 
de La pression äi'” uche {arr Dro— 
gramme en attendant la pression de La -ou 
i ina! e 
LENU 





CHR$ équivallent à XTOA 
NUM équivallent à ATOX mais ne supprime pas le 
caractére en alpha. 
RDEL supprime le caractére de droite de alpha 
R$ place en x le caractére de droite de alpha 
L$ place en X le caractére de gauche de alpha 
LDEL supprime le caractére de gauche de alpha 
RHASTO recopie en X les 6 caractéres de droite 
de alpha 
CLRKEY afface tous les assignements 


Un exemple trés simple: CL X: Dans le ROM interne n°1 
de votre AP, se trouvent les programmes des fonctions. 
n'oubliez pas que de nombreuses instructions ont #t6 
effectuées avant d'arriver là, et que de nombreuses 
autres seront effectuées aprés, à peu prés les nênes 
quelleque soit la fonction. Ici nous ne voyons que les 
instructions spécifiques/ 


adresse _code 24h _instruction commentaire _ 

10FE 098 X 

10FF o0c L nom de la fonction 
1100 003 C 

1101 OLE C=0 ALL efface le registre C 
1102 OE8 RIT 3(X) écrit C dans X 

1103 309 aller en 

1104 002 2NC GO O0C2 00C2: routine de fin 


de fonction 
C'est Tout!!! Le point d'entrée de la routine est la 
ligne 1101 . Pour lire le nom de la fonction(catalogue, 
ou maintient du doigt sur la touche) il faut aller vers 
le haut . Le code des lettres n'est pas le même que 
le code standard ici le code de C est 2, le code deL 
est C(décimal 12) et le code de X est 2k(dec) mais 
c'est le dernier caractére à lire, donc son code est 
augnenté de 128. 
Pour effectuer CL X il suffit de suivre le programme 
vers le bas à partir de 1101 . 


PROGRAMMES 


Cher collégue, 


Merçi pour votre lettre reçue hier. Voiçi mon bulletin 
d'adhésion à PPC Toulouse, ainsi qu'un chéque de 60 F 
pour que mon abonnement débute au début de l'année. 
Je suppose que dans ce cas le port est compris pour 
les anciens numéros. Si cela n'est pas faites le sa- 
voir. 
Je joins un petit programme (CFA) de copie de fichier 
alpha (ASCII) sur cartes, ainsi qu'un programme de lec- 
ture de fichier alpha (LFA) qui est indépendant mais 
bien utile pour vérifier et une carte de donnée (DD) 
qui va avec CFA. (avec Xfonctions et Xménoires) 
L'emploi de CFA est trés simple. Pour commencer,puis= 
qu'il y a une carte de données, faire XEQ 3, intro- 
duire 10,032, RUN puis introduire les cartes. Il suf- 
fit de suivre les instructions de la bande de papier. 
Ce programme fonctionne sans inprimante. 
Une fois le fichier introduit, faire EMDIR et XEQ LFA 
pour le lire. De même, pour sauver un fichier ASCIZ 
sur cartes, faire XEQ À, etc... 
Pour copier un fichier en modifiant la taille XEQ C. 
On peut diminuer la taille, mais c'est dangereux, on 
risque de perdre des informations. 
Ce programme met un "x" aprés chaque fin de RECORD. 
on peut mettre un autre caractére, 4 par exenple, 
qui a moins de chances de se retrouver dans un fichi- 
er A$3 c'est le pas 64 "x" qui est à modifier. 
Au pas 21 il y a 1,5. C'est le coefficient par lequel 
j'ai multiplié la taille du fichier en Xmémoires pour 
tenir compte des 4. Si les lignes sont larges on peut 
prendre un coefficient plus faible car il y aura zoins 
d'u et donc la taille ninimum 2st plus faible. 
On peut aussi faire un PRREGX avant la copie sur ca- 
rtes pour voir si tout a été mis en ménoire centrale. 
On doit pouvoir tester cela avec les drapeaux. Si j'ai 
une version améliorée je l'envoie. 5i cela est possible 
je souhaite récupérer les cartes, avec d'autres pro 
grammes, pourquoi pas. Il y aura bien un peu de place 
à coté des numéros die ia revue. 

amicalement et zerci 

Damien DEBRIL T33 











ite ies articles sur La programmation synt£ 
r je n'y connais pas grand chose. SLT Faut 
r un peu pius les applications, dites ïe. 


s: je répond à la plus part des remarques fai- 
dans un article ailleurs dans ce numéro. 
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64 *+° 128 CLA 188 PROMPT 
êleLBL “CFA 65 ASTO ID A1 129 ARCL 98 189 “HBRE DE REC* 
A2 BL A 66 ISC 18 138 PURFL 199 AVIEN 
93 CF 81 g7- + 191 PSE 
84 “SAUVEGARDE * 68 SG 81 131 “HOUV. TAILL 192 “18, aaa” 
s9-NIE #9 - 132 PROMPT 193 PROMPT 
d PSE 78 GTO 88 133 “HOUV. NOM ?< 194 STO 88 
@7 “FICH. AS° 134 OH 195 *CARTES" 
38 AVIEX 7LeLBL 13 135 PROMPT 196 AVIEN 
89 PSE 72 BEEP 136 AOFF 197 RDTAX 
18 “SUR CARTES" 73 CF 27 137 CRFLAS 198 ! 
LL PROMPT 74 “SAUVEGARDE” 138 RCL 81 199 + 
75 AYIEN 139 1 288 STO 81 
1248 11 76 PSE 148 - 281 “NOM DU FICH?- 
13 CLRG 77 “O-H ?* L4i ,881 282 AON 
14 NOM FICH. 2" 78 AO 142 « 283 PROMPT 
15 AN 79 PROMPT 143 11 284 AOFF 
16 PROMPT 88 ASTO Ÿ 144 + 285 RCL 8 
17 ASTO 88 81 AOFF 145 STO 81 206 INT 
18 OFF 82 -0* 287 RCL 88 
19 FLSIZE 83 ASTO X 1466LBL 83 288 FRC 
28 STO 83 84 KV? 147 “JE CHARGE" 283 1800 
2115 85 GTO 84 148 AVIEN 28» 
2% 86 GTO 85 211 XOY 
2311 1494LBL 86 212 - 
24 + 874LBL 84 158 CLA 213 RCL 18 
25 SIZE? 88 BEEP 151 ARCL IN 81 214 - 
26 X(Y? 89 CLA 152 APPREC 215 CRFLAS 
27 XOY 96 RCL 81 153 1SG ei 216 GTO 83 
28 PSIZE at 1 14 -- 
2 0 92 - 217eL8L C 
J8 SEEKPTA 93 ,801 1SSeLEL 87 218 CLRG 
3111 ds 156 CLA 219 SF 81 
32 STO 81 95 18 157 ARCL IHD 81 228 MODIFICATION" 
33 *JE REMPLIS" % + 158 ASTO X 221 AVIEN 
4 AVIEN 97 FIX 3 159 “s* 222 PSE 
35 SF 25 98 ARCL X 168 ASTO Ÿ 223 “TAILLE FR° 
99 “+-CRRTE- 161 X=Y? 224 PROMPT 
JBL 48 188 AVIEN 162 GTO 88 225 GT0 11 
37 GETREC 181 HBTAX 163 CLA 
38 FC? 25 182 STOP 164 ARCL X 226L8L 18 
39 GTO 18 165 APPCHR 227 FS? 81 
sl 1836LEL 55 166 ISG 81 228 CI0 12 
4 STO 82 184 “ARRET: O-H 7° 1672" 229 GTO 13 
42 ALENC 185 RON 168 GTO 87 234 .EN. 
1e 186 PROMPT RIS= 5,8 
#47 187 ASTO Ÿ 169eLBL 88 R1L= “NON AD- 
45 ENTERT 188 AOFF 178 ISG 81 RI2z “RESSE * 
46 INT 189 “0 171 GTO @6 R1Z= EST" 
47 K=Y? 118 ASTO X Ri4= 2" 
48 GTO 81 111 X=Y? 1724L8L 89  RIS= “JANIEN: 
491 112 CTO 89 173 BEEP RIG= “ DEBRI- 
58 + 174 CF 81 RI7= Le 
1L3LBL 12 175 *FIN° RIS= “+ 
SLeLBL 81 114 BEEP 176 AVIEN R19= *38, RU° 
52 ,881 115 CF 27 172 STOP R28= “€ Mg" 
3 + 116 “CREATIOH" R21= * MAI 1e 
S4 ST+ 82 117 AVIEN 178eLBL B R22= “945° 
118 PSE 179 CF 27 R2= ee 
JS#LBL 32 119 *HOUV. FICH* 188 CLRG R24= *5919 - 
56 ASTO IHD 81 128 PROMPT 181 “CHARGEMENT = “HAZEBR* 
57 ASHF 121 CLA 182 AYIEN R26= “OUCK” 
38 156 81 122 ARCL 88 QSSPÆ  Ra7= "ee 
59 - - 123 FLSIZE 184 “D UM FICHIER" poge TEL: je 
69 15G 82 124 “ANC.TAILLE=" 185 AVIEN R2G= *6(2834 
61 GTO 82 125 FIX @ 186 PSE RIS= *1.40.6° 
62 FS? 17 126 necu x 187 *DEUR SUR CARTES- pis «ge 
63 GT 88 127 PROMPT R32= “+ 
es 
re ee L3HLBL 3 
83 “LECTURE FR 14 “A PARTIR DE 
jé AVIE 15 AVIEN 24HBL 81 
son 16 PSE 25 CETREC 
% En 17 “QUEL NO ?- 26 AVIEN 
27 A0 18 PROMPT 27 PSE 
38 PROMPT 19 CLA 28 mu 
A9 ASTO 48 : …. 38 29 .END. 
ü En a 22 ARCL 41 
12 AOFF 23 SEEKPTA 


lOUTRI{, le ler dout 32 
Cher Jeen-Deniel 

“merci Jour la création äu PPC Toulouse, oour l'édition 
d'un Journal en Frençais {je vais enfin jouvoir r'exprimer 
sans la rène de l'Anglais), et nour m'avoir envoyé les 4 
numéros déjà parus. , | 

Avec tous les nérirhériques et rodules que je vessède, je 
2asse on temvs À brancher et à débrancher avec les risque 
que cela convorte (tuz?? Eu lecteur âe cartes 2ntre zutre} 
Je suis orèt à échanser res 3 -odules-rémoires sinnle-den- 
sité, raintenant inutiles, contre une "nrise-multinle", 

Deux ie nes ériphériques re <onnent ruelaues soucis , 
dont je n'ai pas entenëu sarler: 


- le voycnt 34T <e l'imprimante est constamment alluné nais 
l'irvrimante fonctionne bien (sauf quand la batterie est 
vraiement à plat). Que faire? 

- le lecteur de carte fait de nlus en plus souvent un brui 

+ métal-métal, comme s'il mancuait de lubrifiant (mais où 
mettre de l'huile?})? 

Après ces quelques nroblènes et avant de rartir en congé 
nuelques contritutions au journal : 

1) ivec l'excellent prosranre "TIHER" de Clifford (4516) 
et Keith (4360) PPC CJ v8n2P18 ; j'ai mesuré les temps d' 
exécution (en fait de lecture, 4'intervrétation et d'exé- 
cution) royens et anproximatifs de quelques fonctions du 
X FUNCTIONS YODULE. Voici les résultats obtenus. 


FONCTION 








millisecondes). 









ALENG} 4 70 à 170 
aux) 180 à 450 
som}; 180 à 280 
nus 65 3 115 

100 à 300 
RCLFLAG 30 
SIZE? 60 + 2,7#SIZE 

. STOFLAG 30 

"OF 100 
xTo4\ i 65 à 115 


(1) ces fonctions äépendent notablement, entre autre, du 
nonbre de caractères contenusdans le registre ALFHA, plus 
ALPHA est long, plus l'exécution est rapide. Par exemple 
pour ALENG, en appelant NX le nombre de caractères dans ALR 
HA, on obtient: 
temps de ALENG = (186 - 4,6 x N) ms ON = 1 à 24 

= 176 ns N=0 
avtre exemple:ATOX et XTOA prennent ensemble 130 ns si N= 
24 (faire CF 26) et 230 ms siN=1. 

2) On peut grace à ces puissantes "Zxtended Functions" 
convertir 2 "digits" hexadécimaux en valeur décimale en 
1,2 s.et la transformation inverse en 1,5 s {temps de cal- 
cul sans Les entrées-sorties et Les tests) avec le progra- 
mme "DE", 


Fes 234L8L H 

Luc Haas QUH “HEX?- STOP AOFF 
ALENC 2 k+v? 

BIeLBL “DH- “2 DICITS KeY? PROMPT 

#2LRL D ASTO X ATOX ATOX 


"DEC?" PROMPT “H(256* XEQ 38 POSA XC)Y POSA 
296 XC=Y? PROMPT XCY 16 + + CLA ARC E 
ENTERT ENTERT XEQ 94 “ha®  ARCL X PROMPT 
AROT ATOX Rt 16 / 

XEQ 98 AROT ATOX CLA S4eLBL 38 

ARCU T ‘+=* XTDA “9123456787  “+OABCDEF* 
XC) Z XTOR PROMPT END. 


ra AROT {ligne 13) utilise le registre X modulo ALENG(id 
16 

3) Enfin, en utilisant l'excellent programme (encore un), 
de Jean Thiberge (L'Ordinateur de Poche n°6 254) et avec 
une vieille imprimante (821434) et du papier noir, on peut 
compenser l'oubli de HP qui ne nous a pas fourmi de codes- 
barres pour les X-FUNCTIONS. Ci-joint une photocopie des 
codes=barres obtenus pour les nouvelles fonctions, ils so- 
nt très bien lus à petite vitesse ce balayage, parfois 


. dans un seul sens, souvent dans les deux. La photoconie 


est d'ailleurs mieux lwaue l'original. Quatre codes-barres 

en prime: 

GO. — 

eCOBLEP — (55 à: 88 donnent les fonctions inprimante 1CA à 
STKPLOT) 

#Â—— et W— (donnent divers XROK 00,— à C7,—) 

Pour ces 3 demmières fonctions, on Svitera les :‘Z'ORY LOST 

en essayent les différents paramètres en mode PRO“. 


. à bientôt et bonne programmation. 


Jean-Pierre (7309T29) 2=2Y1IER 
Bourg de HONTRT! 
24110 SADIT-2STIER 


-Pour les prises nultiples, voir ia 3:CAPE 22 2ventue 
ie la République 234120 Tontenay/bois 

- un prix de T7 pour des modules simples i'sccasion 
ae semble ;j: 
Pour le voyan 















circuit est 
évidente, 1 n'y a au 
- Zdem pour lecteur 
poi ie graisse 
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PS 


HP-67 HP-67 HP-07: 


Décomposer n! en produit de facteurs premiers: 


Lb1l À -x-fin de programme , Rel 0 

: R/S affichage de nl! {%o ÿ 

Reg “ 

Dsp O0 Red. 

Sto 8 Lbl C xy 

2 2 Gto 6 

Sto 0 __ STO 1 Rtn £ 

Pause SO Gsb = Lb1l 

Gsb b Loi 7 Rel 0 

Rcl 3 Rel 7 Pause : 
haies 0 s Gto 8 affichage pause 
| + du facteur premier 

A 1 Sto 1 divisant n! 

3 Gsb £ | 

7 Lb1 D 

S O0 Red. ! s 

are . Uw)Sto 6 

Lb1 8 e 1 

Rel A Sto 1 Sto 1 

% Gsb E Lb1l 3 

x=Y Réel 7 Rel 6 
(20)Gto a 1 Stoxl 

Gto b £ RéL TZ 

Loi a + L 

R/S Sto 1 - 

Gto 3 9) Gsb E , Rel 8 

Lbl b L Mo) x>Y 

Rel 0 2 Gto à 

Gsb D Sto+7 Gto 5 

Lbl B Rc17 FE : 
(30) ei Û È : 
{ ce 

x=Yy Sto 1 és 

Gto 1 Gsb E Sto+5 

2 Gto 7 Le - 

Sto+0 > 

0 (Lo)Lbl E fi2o) Rel 5 

Sto: T7 Rel 0 + A 

ee ser à 

R ! 

y Sto 2 se 5 
(1 Int . 
RGB Ro Sr à affichage fixe 

so € x=y de l'exposant 

. : Gto B du facteur 

Êce ; premier 

Exenple: 


décomposer 15! en produit de facteurs premiers 
PR) 

2) A 

2 apparait à l'affichage pause puis arret sur 11 


noter sur une feuille ati 

3)R/S 

3 apparait à l'affichage, arret sur 6 noter 3 

u) R/s 3 

5 apparait à l'affichage, arret sur 3, noter 5 

et ainsi de suite, 2 

on note: Th ls 1 

arret du programme sur l'affichage de 151=21307674368 
exposant 12 


151=211 x 36 x 53 x T° x 11 x 13 . De l'exposant de 2 


et 5 on déduit que 15! comporte 3 zeros à droite. 


Raymond Louis (TS55) 


FM. CUÜTDE 


TOULROMIA est né! outre une disposition légérement 
différente de ?PC ROM 2 il contient son nom st une 
nouvelle fonction"REP",. ette fonction recopie x 


dans y,z et += . 
te fonction est rés simple. Il suffit de lire 
dans ©, puis d'exécuter ‘me routine de base de la 
«J'utilise ici un extrait de la routine de CLSTK. 
tte routine efface la pile en mettant C à © et 
recopiant © dans x,7,z,t. Je saute ie C=0 et je 
effectue que la suite de la routine. ©QFD. 





Read 3(x)j 1it dans x 
TAt 





w écrit le registre désigné, 

Read 2{x) 21 le place dans C 

drit £criz s le registre désigné, 

21C 30 2OFA est ‘mn saut absolu à l'adresse 19FA 
Remarquez jue La routine CLSTX elle même 





utilise nm zorceau de la routine [LX, grace 

à l'instruction JNC +05 qui est un saut relatir 
O0C2 est ‘me des adresses de fin de routine. 
REP ñe perturbe pas Last 


S4F8 081-281 129 A 
Sn ei ne 18FS 494-258 148 T 
de 18FS 813-843 195 
SAFB 88F-833 150 RUE 
PRE er 19F9 MAE-132 C=9 ALL 
4FD AAC-638  12L 

ë le 19FA 828-808 HRIT ACT) 
MU LOFB 968-1A8 RIT 1(2) 
DEF, 19FC 8A8-208 RIT 2(Y) 


18FD 428-803 JNC s5+95 


558 814-859 æT 1OFE 898-268 152 X 
5581 3€8-F88 RTH 18FF A8C-438 BL 
5582 de8-888 CR 
5583 088-288 se 1188 603-883 30 
5584 898-248 144 P 132 = 
s 1181 84E-132 C8 ALL 
5585 285-911 SE -3 30 
1182 @EB-3R8 MRIT 3CK) 
5586 412-842 18R c 
5507 #F8-2E8 READ 3CX) a 
î 3 1184 982-882 ?HC CO BAC2 
3588 3E9-FAI 1185 899-261 
5589 842-182 ?HC GO 18FA 
556n 488-808 HOP 
5508 208-608 HOP GENS 


CHARTER 


HISFUONIBLE A TOULOUSE 


Overlays carton perforé 4 couleurs, non imprimés, 
reversibles, le jeu de 10 30F (+enveloppe timbrée) 


Pour ceux qui s'intéressent au nicrocode: les docu- 
ments essentiels: 

Microcode 1 le contenu de mon classeur-aide mémoire 
et le listage (microcode) des ROM internes 0,1,2 

L7 p, 25 F + enveloppe timbrée à 8,50 

Microcode 2: listages de Card reader, Toulrom 1A et 

X fonctions 5k pages, 27 F et E.T. à 8,50 

ajoutez une enveloppe timbrée à 1,60 si vous voulez 
étre tenu au courant des développements du microcode 
(Microcode 3 bientot). 


REACTIONS 


Un avis sur la concurrence: 

Ayant lu les articles sur la Ti88 dans les journeaux 
français et dans PPC-J(8 ou 9 pages!) mes conclusions 
sont:BOF! 

avantages: Timer incorporé, modules de mémoire non 
volatile même en dehors de la machine, accés aux re- 
gistres d'état prévu en standard, rapide (+50% de la 
L1C) 

inconvénients: pas de noms aux programmes, utilisa- 
tion de programmes dans les périphériques malcommode. 
Chére,pas de lecteur de cartes, imprimante volumineu- 
se et sur secteur, pas de tracé de courbes, pas de 
touches assignables, et la logique de programmation 
de la TI59 (bien qu'avec une logique algébrique re- 
marquable). 

INDISCRETIONS !!! 

De source généralement bien informée, au moment ou 
nous mettons sous presse, nous apprenons la sortie 

de la HEPP Llll....peut ètre un jour. Pour l'instant 
il doit déja y avoir chez les concessionnaires la 
riposte HP aux PC 1500 et autres FX 702P: le HPTS, 
petit frére du HP8l, avec le même micro processeur. 
Je ne sais pas le prix: sûrement trés cher. 

La HPkl n'est pas abandonnée pour autant et je ne 
serais pas surpris si tous ces modules se retrou- 


3 


vaient dans la boite (k1C? c'est l'inconnue) 


CRE 
CEE 


Vous avez peut-étre été surpris de voir que ce numéro 
du journal est le N°1 . =n effet ! autres numéros ont 
déja £té imprimés. i e premier 
de l'association ? e 


= créée an Jui- 
let. 


‘J 
ati 
14 

Oo 


SUR LE MRRCHE 


Si vous voulez des journeaux anglais, italiens ou 
américains i'infornatique adressez-vous à 


37, AVENUE DE L'OPÉRA 
Tél. : 261-52.50 


BOOKSELLERS - STATIONERS 


PPC-T N 1 
SEPTEMBRE OCTOBRE 
198982 P14 


T8 Randriam Jean Pouru St Rémy 08140 Douzy 


Liste des adhérents: 

7226 Dodin Jean-Daniei T7 rue du Cagire 31100 Th9 Damiani J 6/18 Allée Maxime Gorki 9120 
Toulouse (61) à 03 06 Fontenay/bois us er à 

9177 Bravo Jean-Louis 3 Allée des Boutons d'Or T50 tél es ie rue Eugéné Sue 31400 Toulouse 

6 s 61).53%8321 

apt 17 31700 3LAGNAC (61) 71 80 59 S / Ca 

8084 Assié Jean-Louis 275 route de Seysse Bat A8 T51 Bregeault Jean-Louis rue ce Sarre Va bts 
apt 284 (61) 1 20 47 Ker Louis 50510 Cerences (33) 51 95 53 
Pretre Picrre ‘18 Av Cantlile rlansasion TS2 Senez 3runo 60 Chemin de la Glacière 69600 

jé 8 $ £ É / LU 

31500 Toulouse (61) 48 21 55 Qullins (7) 850 64 61 : 

3765 Blosse André 16 avenue de Gascogne 3117 T53 Mora André 12 rue Gaubert 24200 Sarlat la 
Tournefeuille {61) 06 62 20 £aneda (53) 29 56 83 (HP6T et 97) 

9119 Derin Frédéric 30 3d du Comminge 31800 TSk Berthelet Roger 16 square du pont de Sévre 
StGaudens (61) 39 61 14 92100 Boulogne Billancourt L 
Lacroix Hubest 28 Allée des Platanies Vil- T55 Raymond Louis 20 rue de 3lagny 28110 Carignan 
leneuve Tolosane 21270 Cugnaux 5 (24) ee 05 se (HP 67) 

7h51 Taillandier Janick 9 rue Delezenne 59000 T56 3arrabé Patrick 2 place Yalladier 57000 
Lille (20) 93 78 60 Metz | | A AP 

3324 McGechie John ?o Box 512 Ringwood Victoria TST Georgelin Daniel 7 av du Général de Gaulle 


56170 Quiberon 


3134 Australie 
3115 T10 Gautier Pierre 77 allée de Brienne 31000 

Toulouse (61) 21 13 62 

Tll Basso Jean-Luc k rue Jacques Darré 31309 
Toulouse 

T12 Montarsolo Stéphane 23 Chemin Tricou 
31 Toulouse 

T13 Monachon Olivier 19 rue de Coulmier 31000 


T58 Charnay Claude 31 rue Gilbert Privat 24000 
Périgueux 

T59 Meyer Daniel Avenue jardin Ecole 13 820 
Dison BELGIQUE 

T60 Perona Paul lotissement Beillet 2 rue Athos 
LO00O Mont de Marsan 

T61 Bailly Philippe Fontagnéres 31160 Aspet 
tel (61) 88 50 28 


Toulouse (61) 62 93 L8 > 5 à | 
Tlk Perthuy Thierry 2 rue Victor Dequé 31500 T62 Pougeon Olivier 6 Bd Chanard 56170 Quiberon 
Toulouse Le numéro en tète est le numéro PPC-USA. Soyez assez 
T15 Sibille Jean-François Résidence du Pays aimable pour me le donner lorsque vous venez d'adhé- 
d'Oc rue des Genets 31500 Toulouse rer. 


Il est tout à fait souhaitable que des relations di- 
rectes aient lieu entre les adhérents et le cas éché- 
ant que d'autres chapitres se constituent. Tenez nous 
au courant pour PPC-T,. 


(61) L8 52 57 

T16 Delebecque Alain 76 chemin du Calquet 
Ecole du Cadastre 31080 Toulouse 
(61) L9 30 87 


T17 Benet Patrick 70 rue St Roch apt 5 bat X T6é3 Sponga Luc 7 rue Auguste Ravier 38100 Grenoble 
31 Toulouse (76) 54 LO 96 

T18 Pasquier Jean-Yves apt 10 2 rue de Gréce Ték Lavillaureix Pierre 1 place Albert ler 67000 
31000 Toulouse Strasbourg (?) 61 61 33 

T19 Schuttler Roland INSA av de Rangueil Té5 Benedetti Marco 132 rue Staempfli 2503 Bienne 


31077 Toulouse Cedex (61) 25 21 13 Suisse 032/k1 92 51 

T20 Guerch Olivier "Le Fournier" Rebigue T66 Picard Alain 266 rue de l'Université 84200 
31320 Castanet (61) 72 28 03 Carpentras (90) 60 05 63 

T21 Kolabukoff Alexis 27 rue Mal Joffre 26000 TéT Demaugre Denis Résidence St Martin Chemin 
Valence (75) 56 LO 53 clairefontaine 06140 Vence (?}) 24 02 54 

T22 Barret Gilles 92 Av de Muret 31300 Toulous 
(61) 59 08 31 

T23 Hanon Jean-Marie 17 rue Collot 77120 Cou- 
lomier (?}) LO3 34 80 

T24 Delmas Michel k Les Bois du Cerf 91450 
Etiolles 

T25 Debaque Philippe 157 rue de Meaux 93410 
Vaujours (?) 860 13 5 

T26 Houdayer André Parc Ducup Allée des Fréne: 
Route de Prades 66000 Perpignan (68)542536 

T27 Dumaine 262 rue de la Chevalerie 
60230 Chambly (k) 034 90 22 

T28 Bailleul Christian Collége Jean-Rostand 3 
Chenin de Reumont 59360 Le Cateau Cambrésis 

7809 T29 Reynier Jean-Pierre Bourg de Montrem 2k110 

Saint Astier Le 1Æ 


7208 T30 Dely F i de en à 6 ; 
s tan 10 où Fe nee RE SNUErE. SORT. SONRases à Une affiche "PPC" destinée à faire connaitre le club 


: £ EME est disponible pour affichage chez les concessionnaires 
FE ie os FÉRÉE NE ER OCR PAS RSS AE TON ou at de DR Ti dance d'un nouveau modéle, 
. 3 2 lus soigné que le précédent (qui était bicolore ). 
5e chantre PAU SALE Mederd 31360 SE Hartory üa rite est . principe Soin au journal, mais 
T33 Debril Damien 38 rue du 8 Mai 1945 59190 vous pouvez en demander d'autres * 
Hazebrouk + 


T3k Klein Bruno 35 rue äu 
<erque 

T35 Lebastard Frank 10 rue de la Jalousie 35600 
Re don 

T36 Ducasse Jean-Pierre 10 24 StVincent de Paul 
0990 St Paul les Dax 

T37 Xorak Raphaël 9 rue Vaneau 75007 ?aris 

T38 3oissat Christian 128 3ld de la Croix Rousse 
69001 Zyon 

739 Doineau Eric 4 rie des Chevalleries 
Fondettes 

TLO Leliévre Dominique 100 rue d'Estienne d'Orves 
76629 Le Zavre 

Th1 allés S-P 
Dullins (7 


DIVERS DERNIERE MINUTE-DIVERS DERNIERE MINUTE 


POURQUOI _QUE?? 


Un ou plusieurs programmes sont en mémoire.PRGM-CATI 
et R/S sur un END quelconque.DEL 999 et on voit 
apparaitre 4094 et l'instruction précédent le END... 
Ne pas faire de SST, mais des BST nous font remonter 
tout le programme ainsi que les précédents s'il y en 
a.Lorque l'on a ainsi remonté plusieurs lignes ,des 
SST nous font revenir mais en faisant l'aller retour 
plusieurs fois,les numeros de lignes changent ainsi 
que leur contenu... 


Fort Louis 59140 Dun- 


Derniére heure, en direct des USA: XP annonce ie 

encore peu de détails. Cependant: 

prix 995$ (environ 10 000 F) 

le nicroprocesseur du HP85 et du 4P8l 

Basic en mémoire morte de 8 X mieux jue celui äu 

0 PS) 

5" en plus 48K de mémoire morte (ROM) possible an nodules 
2ù X de RAM (mémoire vive) naxi, dont 1l6K en standard 





uw 


72 


ww 


dinensions: 127 x 254 x 38 c'est piustot gros 
affichage LCD 32 caractéres 


3atterie de la 4P 35(7?) 30 neures an continu ou 3 
semaines en discontinu, mémoire permanente. 
Moduie XPIL incorporé 

(2) instructions BASIC 


n de la gaciére 59600 
= 


15 rue de :'industrie 





Th150 Rumi 





r Di ä e LO Cour s L 2 
TL3 Lany ?ierre des Carreaux 92400 Cour semble qu'il y ai un lecteur de =artes trés par- 
: ; lo 3 33 : 25ù x T6 
Hi DExQTe Te Fe a Mr 5 3 iculier: pas de noteur, cartes 25u x 
T4 Souche André 21 avenue =Zmille Bertin Sans Loose Dan CsTte 
34100 Montpellier (67) 62 50 37 : Sans rendez vousr et ice 
Th5 Menet rnard 72 rue des aAntignans 26110 SAP Es near SRE 
rene sernard rs LC 8 Fe Horloge incorporée 
Jyons 
Thé Clauss an J.2 rue 
d'Oslo 57 





47 ?Ot Laurer 


PRPES=TPON 1 
SEPTEMBRE JCTOBRE 
1982 PS 


18 FS2 13 


REACTIUNS SLeLBL TX" 19 SF 85 SeeLBL *DF” 
2 28 FS? 14 31 STO 88 
33 128 21 SF A6 52 INT 


Cher Jean-Daniel 








Je tiens à te présenter un programme synthétique qui ë4 #02 è2 FS? 15 33 
n'est pas de ee. mais de LEOneT Ancelet, publié dans 85 LASTX 23 SF 07 : ! 
VIN du PPC Paris Chapter, et qui "parait-il" permet 3% + 24 XO à 56 STO 18 81 / 
d'entendre les TONE synthétiques sous la forme "Tone Ed 3 x 57 RCL 88 2 RCL 48 
Ind x" avec x compris entre O0 et 127: 89 CF %6 2 58 Rt 83 - 
aies les codes Hexadécimaux 18 FS2C 47 28 REL * 59 X=ÿ? 84 FIX IND 97 
ee Se Le En fait je désirerai savoir 11 SF 81 29 CLA 68 GTO 88 85 RHD 
ligne 25: ä ScAadEe M comment peut-on programmer 12 FS2 89 38 STO € 61 ST- Ÿ a 
rene ue 00 la ligne 31 et comment le code 13 SF 42 31 “+i° 87 GTO 87 
. 28: 3c1 N hexadécimal donné permet de 14 FS? 18 32 E6 S24LBL 87 88 RCL Z 
“SE SG. StS ï la programmer. Pour na part 15 SF 83 33 XO b 63 RDX 
RTE Ma à Le : j'ai effectué: =nter,3G Enter 16 FS? 11 34 EXD 64 1/X 39eL8L 38 
HÉSRS ES ES PAC GE: TC (Xrom 28,63), ensuite j'ai rem- 17 SF 84 65 ENTER 29:RCL. 18 
placé par Mean puis BST jusqu'a = ter, un nouveau BG 66 INT 94 SICH 
et enfin j'ai effacé Enter "-?7--0M etSto 15. 01 LBL "quOT“ 67 - 32 STs 18 
02 FIX 0 68 RCL 89 3 + 
De plus je désirerais que vous essayez ce programme 03 STO 00 69 RCL 18 ne 18 
car pour ma part j'ai fait XEQ "TIX" et au bout d'une o& 1 78 STO 89 SA FC? 18 
aeure je n'avais toujours rien entendu (un peu long, 05 LBL 00 71 LASTX 36 RTN s 
tout de mêne!). S'il manque quelque chose pour l'exé- 0b TONE (8) 9 2% 37 GT0 8 
cution de ce programme, je vous prierai de me le faire 07 RCL Y 73% 
savoir. 08 RCL Y 74 STO 18 
De plus je désirerai savoir si l'on peut commander 09 MOD 75 RL 88 
directement, par voie postale au PPC Toulouse le livre 10 X£0? 76 * 
de dickes: Synthétic programming of the HOb1C", et à 11 GTO 00 IT FLAG 
quel prix? Sinon je désirerai savoir si je peux le 12 XC>Y nee 
commander à Lyon et dans quel magasin? 13 ST/00 79 ST 2 
En attendant VINS de PPC Journal et en vous remerciant 14 1/X 88 RCL 18 
de votre compréhension et de votre diligence, je vous 15 CLA 
prie d'agréer, Monsieur,l'expression de mes sentiments 16 ARCL 00 
distingués. Christian Boissat (T38) 12 +r/ 
18 ARCL X 
19 AVIEW 
Je connais, bien sûr le bulletin de Paris Chapter 20 TONE 9 INSTRUCTIONS: "QUOT" SIZE 001 
(bulletin maintenant fusionné avec PPC-T) mais je n'ai 21 END CF 26 
pas eu le temps à ce moment d'essayer le progranne en CF 29 
question. Au fait il aurait été plus logique d'écrire 
à l'auteur, plustot qu'a moil d'ici une semaine mes va- Placer un nombre fractionnaire en X et lancer 
sences sont terminées et je n'aurai plus le temps de le programme. Le résultat sera donné sous forme 
répondre à ce genre de questions. Pour une fois... d'une fraction non réductible de deux nombres 
VOoiçi la solution: Ta méthode n'est pas bonne puis- entiers. 


que tu as oublié le code CE et le fait que F3 correspond 

à une chaine de 3 caractéres. 

entrer "+AA , BST , BG (inutile de faire Enter) » SST 

voir CLD , SST voir - » l'effacer , taper X<>01 , BST, 

BG , SST , voir LBL 00 l'effacer , taper MEAN,PACK, SEIKOSHM SÉLSRRLIUPRIMANTE GRAPHIQUE. 


An s : : £ : =: MATIBLE HP-IL. 
SST , voir X<>b venir en arrière et rétablir la chaine EEE —————————————" ———- 


de caractéres . reste un - à effacer. 


Il n'y a pas pour l'instant d'exemplaires du livre de POSSIBILITES : 
TRS = ; 4 7 ES 
ee ice à Toulouse, simplement parceque je Puis .en # PLLINEMENT GRAPHIQUE: CHAQUE POINT O'UNE COLONNE 1e 7 POINTS PEUT £TPE 
Pport avec l'importateur en France pour obtenir les JELECTIONNE INOIVIDUELLEMENT POUR OFFRIR UNE LIBERTE CRABHIQUE TOTALE 
droits de traduction et d'adaptation . En fait en rap- AVEC UN MAXIMUM de 499 COLONNES. 
port est un grand mot, car la personne en question était 7 EN MOCE CRAPHIQUE.UNE COLONNE de POINTS PEUT £TRE PEPETEE UN CERTAIN 
<2 Yacance au mois d'Aout et ne m'a pas encore répondu MORDRE de FOIS SUR UNE SIMPLE COMMANDE. 
VOuS pouvez lui demander les adresses de points de ven- # TABULATION RORESSABLE PAR CRRACTERES ET PAR POINTS. 
re et peut-étre réclamer la traduction(!}) il s'agit 4 SUR UNE MEME LIGNE.ON PEUT MÉLANGER INOIFFERENMMENT DES CRRACTERES 
d''ALPEA Systéme 51 rue Thiers 38000 Grenoble", deman- SIMPLES, DOUBLES ET GARPHIQUES. TS 
der Patrick Binet. Tel 16 (T6) L7 80 67 FE IMPRESSION AUTOMATIQUE LORSQUE LE ZUFFER EST PLEIN. 


Z INTERFACE TYPE PARALLELE CENTRONIC. 


Monsie ur, Æ INTERFACE COMPATIDLE HP-IL HEMLETT/PACKARO 


J'ai bien reçu votre lettre ainsi que les 3 anciens < LARGEUR de PAPIER PECLABLE. 

numéros de PPC Journal Toulouse et je vous en remer- 

cie. C'est ainsi que dans le numéro 3 j'ai été trés 

ntéressé par le programme de A. Delebecque: Décinal- 7 2-2--8-3-3—3-0 0-3 0330-30 -3-3-3-3—3-0-9-0-3- GG QT DD DDR me 


© ei pe. 


raction. Maigré tout, celui-çi me parait bien long et 

bien compliqué alors qu'il est possible d'obtenir le 

même résultat avec uniquement 21 lignes, un seul re- SICAPE 

gistre mémoire: ROO et un seul label LBL 00. Je vous 122 AV de CAN REPOS IQUe 

Joint donc ce programme en espérant que vous pourrez F4-12S FONTENAY / BOIS. 

le pubiier ou le lui communiquer. En attendant le pro- TT ——————— 
chain numéro de PPC-T je continue à programmer. 


Salutations Th7 POUR VOS APPLICATIONS 
PROFESSIONNELLES. . 
= & s s à à SUR HP-s 1. 
suelques remarques: je ne me souviens plus äu principe 





ti 31! ï e m 57 

Je fonctionnement du programme d'alain. conne il ne *<— MOCULE D'EXTENSION de PORTS <2>. 
2 avait pas fourni d'article, ce principe n'était pas *— IMPRIMANTE 39 COLONNES GP10S MHP—IL. 
Rod 2 Le a sit É : CIRCUIT PERMETTANT de PLACER DES 
indiqué. Il en est de même ici. Je ne sais pas comment MOCULÉS DANS LA “417 SANS SOUCURE. 
fonctionne ce programme, et c'est génant, car sur le *— LOGICIELS ©-APPLICATION: 

à 3 ia. nt se ; TRAITEMENT Se TEXTE. 
Prénier exemple que j'ai essayé, il ne =archait pas! SUR IMP.: HPEIIL SrTANoaRrDo. 

joint à titre d'exenple le programme äu ?PC ROM GP10S HP-IL. 


T'HARPENTE BOIS. 


qui fait la nême chose (mettez :e nonbre —BETOIN ARME <BH.A.E.L. >. 








correspondant à la précision voulue en 207 TNRAYIGATIIUN. 

La méthode ies réduites, trop longue à expliqu 

11 pveac Le moe + ARS non 1 

+ Téad en x -e nunérateur et en 7 D RS SUR RE POUR VOS CONnRUCes. TEL. 210 27.23.12 
essai: 2,5649l957 resultat de QUOT: 256:9L:357/10C0000000 EEEEEELELELELEÈLÈELEZÈLZLZEZEZEZEZLZLZLEZELEaEaaa 


résultat exact: 245394/95867. 


PPC-T N 1 
SEPTEMBRE OCTOBRE 
19382 P16 





